Whence did the wond’rous MYSELC art arise, 


Of pamting Speech, and speaking to the eyes ? 


That we by tracing magic lines are taught, 
How fo embody, and to colour thought ? 
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‘“‘Welcome to the Sourcebook... 


You will find we couldn’t deliver all we 
promised for this issue of Colorcue. In 
spite of written requests for informa- 
tion, mailed in January, many 
respondents sent materials at press 
time—too late. Others replied in such a 
vague way that nothing less than a divin- 
ing rod could have decyphered the 
meaning. Still others used a handwriting 
(with faint pencil) that could only defeat 
any mortal interpretation. The fault is 
not to be entirely externalized, however. 
We simply bit off more than we (and 
our bank account) could chew. Not to 
worry. The promise will be fulfilled in 
time. Meanwhile, I hope this issue is as 
interesting to you as it has been to me. 


Welcome to those of you who have 
rejoined us, and to those who are new 
to the CCII by virtue of purchasing us- 
ed computers. You are discovering that 
we have a lot to offer (at a reasonable 
price) in the Compucolor community. 
There are at least 200 of us at work with 
the CCII, and an unknown number of 
others with the 3651 and 8000 series who 
are just now finding us. I have been 
working with a few 8000 users in an at- 
tempt to adapt CCII software to their 
machines. They use FCS, but the 
memory mapping is very different. As 
of this writing, things look promising. 
This might mean a somewhat revitaliz- 
ed software market for Com-tronics, 
Bill Greene and anyone else still willing 
to try. 


The highlight of my Compucolor ex- 
periences since the last issue was a visit 
to Rochester and the user group there. 
Imagine, if you can, eleven or so 
owners, all gathered together in the 
same place. They’ve been doing it 
steadily for years, and I imagine they 
have an inadequate appreciation for the 
comradeship and mutual support CHIP 
gives them. The topic for the evening 
was FORTH, one in a series of talks by 
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Baas ah...that is....Part 1.’’ 


Jim Minor on the FORTH language. I 
delighted in putting a ’’face’’ on Gene 
Bailey, Doug Van Putte, Rick Taubold, 
Joseph Charles, Jim Minor, David 
Suits, and all the other names I’ve 
known only in print. Dr. and Mrs. Suits 
were my gracious hosts for a night. 
David and his wife have started a new 
magazine for the NEC APC computer, 
called NEXUS. It has a familiar format, 
and the contents remind one of early 
CCII days—starting all over again. It is 
an appropriate computer for David— 
spectacular graphics, rather complicated 
operating system, and a challenge for 
him for a few years, I imagine. My 
thanks to the CHIP group for letting me 
sit in, and I hope to see you all again 
soon. Wouldn’t it be wonderful if CHIP 
could arrange a grand reunion for all of 
us? How about an International CCII 
Conference for a weekend in Rochester, 
open to all Compucolor and Intecolor 
users? Now that’s entertainment! 


There are some new authors coming on 
the scene. I guess rightly that our group 
has hidden talents. Witness the beautiful 
cover on this issue by subscriber Carl 
Remley of Mississippi. His subscription 
renewal came written in calligraphic 
form and I was prompt to enlist his ser- 
vices. (It is appropriate that we express 
more than our computer interest in these 
pages.) The text is reprinted from the 
first issue of COMPUKOLOR, of the 
user group in the United Kingdom. (I do 
not have the source of this quotation. 
Does anyone know it? 


So, on to the first part of the 
SOURCEBOOK. Rest assured that all 
submitted materials will be published, 
and all promises fulfilled. We look for- 
ward to your new materials as we con- 
tinue our sixth year of publication. 
Thanks to the many of you who have 
sent notes of appreciation, and... keep 
the cards and letters coming. 


Vas 
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A Pascal for the CCII 


Part II. 


In Part I, a subset of Pascal, called 
Tiny-Pascal, was introduced through 
the fig-Forth language. Since Tiny- 
Pascal uses the facilities of Forth, such 
as editing, compiling and disk handling, 
Part I told how to obtain and implement 
both Forth and Tiny-Pascal on the 
CCII. In addition, Part I presented the 
Forth editor commands required to 
enter, edit, store, compile, and run Tiny- 
Pascal programs. 


We will proceed by introducing some 
programming techniques that relate to 
the structure of a Pascal program. 
Pascal is designed as a ‘‘block- 
structured’’ language. The blocks are 
the basic building units of the program, 
sO it is important to have a good con- 
ception of them. Think of blocks as 
logical subdivisions of program func- 
tions. Writing a program to bake a 
cake? Then design blocks to handle each 
part of the job: read the recipe, measure 
the ingredients, mix the ingredients, and 
perform the baking. The effectiveness of 
this block structure might not seem ap- 
parent in a short program, but in very 
complex programs it provides a clear ad- 
vantage over Basic command structures. 


A block structure enables the distribu- 
tion of a complex program task into 
simple, smaller program tasks, which 
may be tested and debugged in 
themselves as they are created. Then, as 
the blocks are connected together, 
debugging will be limited to problems in 
the interaction among the blocks, great- 
ly reducing debugging time. This pro- 
cedure may be followed in Basic as well, 
if you exercise self-discipline, but the 
structure of Pascal syntax dictates these 
good programming practices naturally. 
A properly-written Pascal program is 
more readily accessible by other readers, 
and years from now it will reveal itself 
with the same clarity it had at its con- 
ception. A typical block-structured 
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outline of a program is shown in Listing 
1. The middle column contains the ac- 
tual program code. The first and third 
columns are comments. 


As the listing begins, we see a pro- 
gram name (PROGRAM DUMP- 
CAKE). We see a declaration of a con- 
stant OVENTEMP, and a declaration 
of the variables CUP which is to be an 
integer number, and TEASPOON 
which is also to be an integer. In Pascal, 
constants and variables must be declared 
(identified) before they can be referenc- 
ed by the program. This treatment is 
distinctly different from many versions 
of Basic, where one can assign a non- 
dimensioned numeric or string variable 
anywhere in the body of a program 
without regard to its type (real or 
integer). 


Next we see a procedure, PROC 
RECIPE (procedure ‘‘recipe’’), and a 
function, FUNC PROPORTION (func- 
tion ‘‘proportion’’) specified. RECIPE 
might tell how to mix the ingredients; 
PROPORTION might describe how to 
proportion the mixture for various sizes 
of cake. These are ‘‘subroutines’”’ which 
can be ‘‘called’’ by the main program. 
The declaration of variables and the 
specifying of procedures and functions 
are placed at the head of the program 
so they may be ‘‘seen’’ by the program 
before it begins execution. (This is much 
like reading data statements in Basic, 
before using the data.) You will notice 
that both the procedure and function 
portions may be ‘‘sub-programs’’, of 
several lines, each marked with a 
‘‘BEGIN’”’ and ‘‘END”’ to define the 
scope of each. 


Now we approach the main body of 
the program which schematically 
represents several groups of coded in- 
structions. Some elements of the group 
are ‘‘nested’’ (like FOR....NEXT 


Statements in Basic) and others are se- 
quential. We use indentation in the 
listing to help the eye separate the 
groupings according to the sequence in 
which they perform. 


Notice the punctuation after the END 
statements. Those END statements that 
are within the body of the program are 


followed by a semi-colon to indicate that 
the program continues. The final END 
statement is followed by a period (.) to 
indicate the conclusion of the program. 
Of course a program may have a wide 
variety of these BEGIN...END sections 
in all combinations. 


The listing also contains statements 


LISTING 1. Schematic outline of a Pascal Program. 


\PASCAL PROGRAM\ ——- PROGRAN DUMPCAKE; \WAIN BLOCK HEADING. 
\DECLARATIONS\ CONST OVENTENP = 358; \BEGIN DECLARATION BLOCK\ 
VAR CUP: INTEGER; 
TEASPOON: INTEGER;  \END DECLARATION BLOCK\ 
\PROCEDURES\ PROC RECIPE; \BEGIN PROCEDURE BLOCK\ 
BEGIN 
END; \END PROCEDURE BLOCK\ 
\FUNCTIONS\ FUNC PROPORTION; \BEGIN FUNCTION BLOCK\ 
BEGIN 
END; \END FUNCTION BLOCK\ 
\NAIN PROGRAM\ BEGIN \BEGIN MAIN BLOCK 1\ 
BEGIN \START BLK 2\ 
END; \END BLK 2\ 
BEGIN \START BLK 3\ 
BEGIN \START BLK 4\ 
END; \END BLK 4\ 
END; \END BLK 3\ 


\END MAIN BLOCK 1\ 


set within the reverse backslash marks, 
which are comment sections (like REM 
statements in Basic.) Pascal differs from 
Basic in that comments may be placed 
both before and after a code statement. 
The compiler will find the code state- 
ment and extract it. 


Let’s see how to specifically design a 
Tiny-Pascal program through the 
FORTH language. We will do this by 
writing a program to compute the area 
in a 2 by 4 rectangle (Listing 2). The 
spaces and punctuation are required, as 
shown, both for FORTH and Pascal 
syntax. Since we must first proceed from 
FORTH, we will follow a FORTH con- 
vention by placing the name of our pro- 
gram in parentheses on the first line. 
Parentheses are ‘‘delimiters’’ (comment 
markers) in FORTH. This will be 
followed by the FORTH words 
‘*PASCAL’’, which invokes the Tiny- 
Pascal interpreter, and ‘‘DECIMAL’’, 
which tells FORTH that our numerical 
data will be entered in decimal format. 
(We could have said ‘‘HEX’’ instead, if 
we meant to use hexadecimal numbers.) 
This is all we need to do to satisfy 
FORTH’s requirements. 


Now we write line 2 for Pascal, the 
Pascal word PROGRAM followed by 
our program name RECTANGLE 
AREA. Observe the terminating semi 
colon. Next we can see that two con 
stants are declared (LENGTH and 
WIDTH) and values assigned to them. 
In choosing the names of these con- 
stants, and the names of all the elements 
of our program, such as the program 
name, variables, procedures and func- 
tions, Pascal allows us to use both let- 
ters and digits to a length of 31 
characters. This permits the names to be 
precisely descriptive. 


A variable is declared next (AREA) 
and it is declared as an integer value. 
Notice the colon following the declara- 
tion of a variable. Now the ‘‘main’’ pro- 
gram begins and we equate AREA to the 
product of LENGTH and WIDTH. 
NEWLINE advances control to the 
beginning of a new line, and WRITE, 
with its printed prompt, prints the pro- 
duct on the CRT. A BEGIN statement 
and END statement bracket this main 
program block. 


While this program could be 
duplicated with a single statement in 
Basic, it serves as an example of Pascal. 
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As the program becomes more com- 
plicated, Basic soon loses it’s advantage 
of brevity, and the clarity of Pascal 
emerges. Among the peculiarities of 
punctuation, notice the semicolon that 
terminates each statement line, the 
**:=’’ used to establish an equate, the 
U6E> OF <ss0s: * to delimit text in the 
WRITE statement, and ‘‘-’’ to 
designate printing the value of AREA. 
NEWLINE is the only ‘‘cursor position 
ing’’ statement in Tiny-Pascal, and gives 
direction to commence subsequent prin- 
ting on the next line. 


You may enter the program in Listing 
2 on a blank FORTH screen using the 
editor. Check it carefully for spaces and 
punctuation. FLUSH the screen to disk. 
To compile the program, type [n] 
LOAD, where [n] is the number of the 
screen containing this program. From 
this point, you may ‘‘run’’ the program 
by typing RECTANGLEAREA. 


Our program would be more func- 
tional and more interesting if we could 
enter new parameters for LENGTH and 
WIDTH from the keyboard. The 
READ statement in Pascal makes this 
possible, and operates like the ‘‘IN- 
PUT”’ statement in Basic. To prompt an 
input, the WRITE statement is used, 
followed by READ. We will have to 
change LENGTH and WIDTH from 
constants to integer variables, and insert 
a few statement lines just after the 
BEGIN in Listing 2. The changes are 
shown in Listing 3. Add them to the 
FORTH screen with the editor, and pro- 
ceed as before to compile and run the 
amended program. Press RETURN 
after entering ‘‘length’’, and again after 
entering ‘‘width.’’ 


If you want to try some more adven- 
turous programing, here are some other 
arithmetic operations available in Tiny- 
Pascal. ‘‘+’’, ‘‘-’’, and ***’’ are used as 
in Basic. ‘‘DIV’’ is used in Tiny-Pascal 
for integer division. The ’’/’’ symbol is 
reserved for real number division, and 
is not supported by Tiny-Pascal. We will 
be looking at other Pascal constructs, 
such as IF...THEN, WHILE...DO, 
FOR...DOWNTO, CASE...OF, and 
REPEAT...UNTIL. These operators, 
along with some exploration into PROC 
and FUNC organization will provide 
many possibilities for practical, in- 
teresting programs. Good luck, and 
good learning! _ 
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Listing 2. A working program to calculate and print area. 


( RECTANGLEAREA ) PASCAL DECIMAL 


PROGRAN RECTANGLEAREA; 


CONST 
LENGTH = 4; 
WIDTH = 2; 
VAR 


AREA: INTEGER; 
BEGIN 
AREA := LENGTH * WIDTH; 
NEWLINE ; 
WRITE ¢ “The area is “, AREA); 


END. 


Listing 3. Changes to RECTANGLEAREA to permit Keyboard entry. 


\FORTH commands 
\computes and prints\ 
\area= | Has 

\Declare constants\ 


\Declare variable\ 


\Main prooram\ 


\End of progran\ 


\Change declaration of these labels to variables\ 


LENGTH, WIDTH: INTEGER: 
\Add these lines after BEGIN\ 


NEWL INE ; 


\Print crlf\ 


WRITE ¢ ‘Enter the rectangle length & width ’ ); 


NEWLINE ; 


READ ¢ LENGTH, WWIDTH ); \Read two variables\ 
\from Keyboard \ 


Errata: In Part |, the screen editor com- 

mand to copy one screen to another 
was incorrect. “COPY [num4] [num2]’’ 
should be corrected to read ‘“[num 4] 
[nNum2] COPY” 


ROM TABLES FROM THE SYSTEM LISTINGS _ v6.78, v8.79, v9.80-3 


This table is compiled from the system listing of three software versions of FCS. (- - -) = NA (not 
applicable); (¢ © ©) indicates that the address is the same as in the preceeding column. Frequently 
used labels appear in boldface. 


LABEL v6.78 v8.79 v9.80 BREAK ee a ae CHDEL Anme eee ea 
A7ON 38E8 0331 0300 BRTR atin mais OO’ CHDLR 21 CRN Kc ae a te 
ACRTSP QOS6 e008 e660 BRTRY 80E0 eee --- CHPLO 39FD 0446 0415 
ADDU 2144 ‘1AE9 1B76 BRTX4 seh be. a aie ES CHTIM COON es 6.6? e'e s 
ADHLA 3518 194—E <*¢-s BSO4 35ED 1A23  ‘4E4E CKEND 5607  HRBA) 6 es 
ADJTKS wicca eae a BSO2 35F1 41A27 41652 CLOSE 2F26 1350 eee 
AESCTB OVOB eee es BSO3 ee eee, CLSEQO 3136 156C eee 
ANHD 3S1D 1953 # ee BSO4 365F 1A95 ‘EFA CLX 2859 OCFC eee 
ASCPL SDFB 0859 =07FB BS10 9896 AGO: m= CMASK B1E0 eee eee 
AUCNT O15S) 8.06) ae os BS14 o389 Spec --- CMDIMP ... = Stl ee BS 
AUTOX 0058 4F3E e¢-6 BS12 230re MOO = = — CMPDH 3453 1889 eee 
B2HEX 33AA ‘17E0 eee BS13 2368 PACEE! --- CMPHD 344D 1883 eee 
B7ON 3A19 0462 04314 BSBO1 35C7 ‘19FD ‘£26 CMT4 2AB4 OF57  OF54 
BA7OF 3946 O38F O035E BSBO2 tines yume reece AEOD CMT2 2ABF OF62 OFSF 
BARTX 3D5F O7BD O75F BSBO3 ir, een. 4EOR CMTAB 257A OA58 O8D4 
BARTY 3D57. O7B5 0757 BSBO4 ieee  wERA CODE 3996 O3DF O3AE 
BARTZ 3D51 O7AF 0754 BSBO5 wiki ay hon = FERD CODE2 39A2 O3EB O3BA 
BARXM 3C13 066A 060C BSBO6 item gia ECS COLFL 81E6 eee eee 
BARYM 3C42 0699 063B BSBO7 sateen. SEDI COLOR 3907 0350 O34F 
BARVIMA os tinier ranean ~% Hey, OGBE BSBO8 3652 1A88 ‘EED COLW 392C 0375 0344 
RATING is) 2 ee Oe ee ,, DAA BSDHU --- --- 49DE COMND 0004 eee eee 
BASEX 0055 1F3B eee BSTR 33E9 ‘181F eee COMOF  393B 0384 0353 
BASFL 81F1 cece ees BUCNT Bf64. 868 == COMON 393A 0383 0352 
BASICE 0046 1F2C cee BUFP 8047 e202 eee COPOO 2B20 OFC3 eee 
BASIC] O052 41F38 eee BXLOP 3C30 0687 0629 COPO04 2B38 OFDBR eee 
BASICW 0040 1F26 eee BYLOP 3C67 O6BE 0660 CPLOX 3E03 0861 0803 
BASORG 0040 ‘1F26 eee BYLOP‘ CPYDV 2C77 ‘10AD eee 
BASOUT 0033 ce+e+¢ eee ak de ie) ieee CR 3872 O2BB 028C 
BAUD 0005 e+e eee C3C9 La. ae CRI yO OR (0) a ae 
BCO4 | 35B2 19EB eee C3C95 inet) enue ae eine UR CR2 2488 133B --- 
BC2BK 35A8 AODE eee CARET OOOD eee eee CR3 24BF 4EA2 Rs em » so 
BCCIX SA05 O44E O041D CARR 3B4E O5A5 056C CR4 24C3 1£46 --- 
BCHK 3292 16CB eee CBC 3005 469B” eee CRATE 81E2 eee eee 
BCHK 1 32BB  16F1 eee CBC 4 3408 4530. «es CRC 247) ARGO *='— = 
BCRSX 8A2A 0473 0442 CBC2 3127 155D eee CRC 1 BOS: ae se 
BCRSY 3A37 0480 O44F CCI 3A09 0452 0421 CRC2 Be OR 6.60) a — 
BEGEX 0038 ec ces CCIx 3A01 O44A 0419 CRCX BAG a 4EOe YT = 
BEGIN 3768 0186 eee CD03 21S) C4 as - CRET 3B56 O5AD 0574 
BEGOT 3A59 O4BO O47F CD04 D849 ABLE seh del ws CRLF 338B 17C1 eee 
BEL 3AC3 054A 04E9 CDHD P49 wiAGd..--- CRSLT 38FO 0339 0308 
BEL S eee me a = CDK 94605 | “OOAA)) a= CRSRT 38B5 O2FE O2CD 
BFILL 81D0 eee eee CDMK iitic’ ate CRSUP 38F6 O33F 030E 
BFSX Aa ye OOTE CDNM 3691 0046 --- CRSUP’ Be eee ae eee OIG 
BHLAD 81D4 e+ eee CDNU 3693 6046" So. CRSXY 3809 0452 0421 
BK2BC 35BA ‘19FO eee CDMK She, GAL nae CRSY 388D 02D6 02A7 
BKCOL 3928 0371 0340 CDRSET CRTO 0060 eee eee 
BLIND 3A09 0452 0424 218B ASO chin CRT1 0061 eee eee 
BLINK 393F 0388 0357 CDSEC 3694 0049 --- CRT2 0062 eee eee 
BRAKE 3AB6 OSOD O4DC CENO4 2AA5 OF48 OF45 CRT3 0063 eee eee 
BRATE 3A09 0452 0421 CENTR DASE OF44  OF3E CRT4 ee ch ack 4. 26h 
BRATX SASF O04C6 0495 CHAIN 3A09 0452 0421 CRT5 0065 eee eee 
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LABEL v6.78 v8.79 
CRI6 O066 eee 
CRTCHIP O060 eee 
CRIMO 25B7 O1A/ 
CRIMSG 25C6 0123 
CRI 0003 eee 
CRTIRAM S1AF eee 
CRITRY 80E2 eee 
CRISET 387CO O20F 
CRIST1 -f-“@>--- 
CRTUBE 396B O03B4 
CRXDA O006C O07C 
CRYDA O06D 00/7D 
CTRKO 81B1 eee 
CTRK4 81B2 eee 
CTWO 2C69 = 109F 
CTYP r=- === 
CUCNTO 81B5 eee 
CUCNT1 81B6 eee 
CURSO 3AOB 0454 
D1 358A 19C0 
D2 359F 19D5 
DSCNT --- --- 
D8CNT --- --- 
DATAM OOSA eee 
DBF 811D eee 
DBFE 819D eee 
DBLK 811D eee 
DDFHD --- == 
DDFHV --- --- 
DDFNM --- --- 
DDFNU a cee 
DDFFC Poca to 
DDFTK --- --- 
DDMHD —<=-- --- 
DDMHV ——- =+=<- 
DDMNM --- --- 
DDMNU sala as hs 
DDMRT —-- --- 
DDMSC seare mieaion oa 
DDMSF -——- =-- 
DDMITK -=- --+- 
DELOO 29B5 OE58 
DELO‘ 29D6 OE/9 
DELO6 2A2B OQOEDO 
DELO7 2A3C OEDF 
DELO8 2A44 OEE/ 
DELO9 2A6F OF12 
DEL10 2A8A OF2D 
DELER 2A9B  OFSE 
DELTA OOOF 0014 
DEVOO 2996 O0E39 
DFDHD iam! eee ha 
DFDHV Sie Sate 
DFDNM Ss, OS 
DFDNU FRY Sia Oe A 
DFDSC Sie: Die em 
DFDSF <= += 
DFDTK -—- “s- 
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LABEL 


DFDV 
DFH 
DFUN 
DIG 

DIP 
DIPS 
DIROO 
DIRO1 
DIRO2 
DIRO3 
DIRO4 
DIROS 
DISPCK 
DIVHD 
DMDHD 
DMDHV 
DMDNM 
DMDNU 
DMDRT 
DMDSC 
DMDSF 
DMDTK 
DOWN 
DSBUF 
DSBUFS 
DSEC 
DUPOO 
DUPO2 
DUPLX 
DX01 
DX02 
DX03 
DX04 
DX05 
DX10 
DX11 
DX12 
DX13 
DX13A 
DXx14 
DX14A 
DX15 
DX16 
DX17 
DX18 
DXCM 1 
DXCM2 
DXX 
DZ01 
DZ02 
DZ03 
DZ04 
DZO5 
DZ10 
DZ20 


EARLN 
EARLN 1 
EARS 


LABEL 


EARSO 
EARS 1 
EBLF 
EBLK 
ECFB 
ECOP 
EDCS 
EDEL 
EDEN 
EDFN 
EDIR 
EDRF 
EDFY 
EDUP 
EFCS 
EFNF 
EFIRD 
EFWI 
EHCS 
EIVC 
EIVD 
EIVF 
EIVP 
EIVT 
EIVU 
ELIN 
ELINE 
EMDV 
EMEM 
EMESS 
EMFN 
EMVN 
EMVIR 
ENSA 
ENVE 


EOFOK 


EPRM 
ERALP 
ERAS 
ERASE 
ERS‘ 
ERS2 
ERSYN 
ERSZ 
ESO1 
ESO2 
ESO3 
ESO4 
ESOS 
ESCAP 


ESCAX 
ESCCRIT 


ESCD 


ESCDG 


ESCG 
ESCTB 
ESEC 
ESIZ 
ESKF 


LABEL 


ESYN 
ETYP 
EVEN 
EVFY 
EVOV 
EWRF 
EWSZ 


EXDHV 


EXEOO 
EXEOS 
EXE10 


EXE100 


EXE20 
EXE30 
EXE40 
EXESO 
EXE60 
EXE/0 
EXE80 
EXE90 
EXH 


©O 
> 
& 
KS 


ao &: © & 
e-.«- ® 3 


LABEL 


FNEW 
FPB 
FPBE 
FPBP 
FPROM 
FPTR 
FREE 
FIREEX 
FSAD 
FSBK 
FSIZ 
FTYP 
FULL 
FVER 
FXBC 


G01 
GAR‘ 
GAR2 
GAREC 
GB’ 
GCMA 
GCTRK 
GCUCNT 
GDATAM 
GDRET 
GETBC 
GETBCO 
GETTO 
GH’ 
GH2 
GH3 
GH4 
GMO‘1 
GMO02 
GMO3 
GMPRM 
GN1D 
GN1Z 
GN2D 
GN2Z 
GNDE 
GNDEO 
GODBkK 
GTBYT 
GXOUT 


HALF 
HANADD 
HANER 
HDCNT 
HDVCT 
HEI 4 
HERI 
HEX 
HOLD 
HOME 
HOMEX 
HIRTIR 


IDEV 


v6.78 


v8.79 


0453 
0453 


eee 
eee 
eee 
eee 
O4A5 


193A 
168E 
16A8 
168D 
165A 
1 8BE 
(EEB 
AEF 
1E4B 
OBC 4 
024A 
1042 
1C5E 
1065 
4C6C 
1C76 
1103 
1106 
10F3 
40DA 
94D 
191A 
192F 
192C 
41BC 
—43EB 
1662 
(EES 


04A3 


1A32 
0043 
1C4B 


02B7 


——_—_ 


0040 


LABEL 


IDM 
INCXY 


INCXYO 


INIOO 
INIO4 
INIO2 
INIO3 
INIBAS 
INITAD 


INPCRT 


INPFL 
INPTB 


INSEQO 


INVEC 
INVY 
INVYO 
INVY 4 
IRBK 
IRBKI 
IROLL 
IS/ 

IS2 

IS3 

IS4 
ISEC 
ISERL 
ISERX 
IUNT 
IVC 
IWBK 
IWBKI 


JMPD 
JMPHL 
JUMP 


KAPO 
KAP 1 
KAP2 
KAP3 
KAP4 
KAPS 


KBCHA 


KBDFL 
KBI 1 


KBRDY 


KBREP 


KCHAR 


KEDEL 
KERDY 
KEYBD 


KEYCO 


KEYOT 


KEYOT ‘4 


KEYTST 


KEYTEST 


KTAB 


LOO 
LOO2 
LOOS 


2DC9 
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078A 
OBC4 
O0CO04 
OCO9 
OCOB 

O1EB 


OODD 
151D 
061B 
061B 


15C4 


OA3C 
11CA 
11D8 
14 FF 
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v8.79 v9.80 


424C 
1266 
1273 
1276 
1280 
4292 
42AB 
12B8 
134A 
1396 
12B4 
13E0 
174F 
1248 
472D 
1760 
176A 
177F 
1339 
17D‘ 
ODF 4 
ODFS 
18A0 
0306 
17DA 


O059C 


O89F 
0902 
O8AB 


LABEL 


LPJMP2 
LPJMP3 
LPJMP4 
LPJMPS 
LPJMP7 
LS1 
LS2 
LS3 


v6.78 


O27E 
07A3 
07A2 


LABEL 


OBC 
OCODE 
ODDFL 
OFFPB 
OPDIR 
OPEN 
OPENX 
OPENY 
OPOX 
OPX01 
ORAM 
ORCHA 
ORHD 
OSEC 
OSERL 
OSTR 
OSTR1 
OSTR2 
OSTR3 
OSTR4 
OSTRS 
OUTBL 
OUTCRT 
OUTFL 
OUTHL 
OVERS 


P2SNUM 
PAGE 
PAGE1 
PARTMP 
PP 
PBINX 
PBINX4 
PBINY 
PBINY 4 
PBYT 
PCFSP 
PCOLN 
PCRAD 
PDV 
PDVO1 
PDVO2 
PDVO3 
PDVO4 
PDVO5 
PDV06 
PDVO7 
PDVO8 
PFSO1 
PFSO2 
PFSO3 
PFSO4 
PFSPC 
PLINC 
PLOFL 
PLOKB 
PLOTX 
PLOTX4 
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80E3 
80F5 
81EE 
26ES 
2D60 
2DAB 
2C86 
2C89 
2C00 
2CA2 
80FO 
3D21 
352C 
80ED 
3A61 
33F4 
3404 
340A 
340C 
3410 
3418 
3718 
81C2 
81F8 
81FB 
80F6 
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OB88 
1196 
11E4 
10BC 
10OBF 
1036 
10DB 
0O77F 
1962 
O4B8 
182A 
183A 
1840 
1842 
1846 
184E 
OOCD 


1908 
O4DD 


166D 
065C 


O6E2 
1903 
14BD 
18EE 
eee 
1414 
1429 
1438 
1445 
144C 
144F 
145C 
148B 
1498 
14DB 
1454 
14F4 
1457 
14AD 
06D3 
0847 
0709 


@ 
, 
@ 
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13CC 
O5DC 
1970 
197A 


1974 


O3FD 
1896 
197E 
eee 


O1BA 


14BD3 


eee 
1E9D 
eee 
eee 


0434 
043A 
1E9E 
1EBO 
1EB7 
1ED8 
1EBA 


LABEL 


STPITN 
STPITO 
STPOUT 
STPTIM 
STPWAT 
STRTMP 
STWO 
STX 
STYP 
SUBHD 
SUBU 
SULD 
SVCHA 
SVCRS 
SVCRS1 
SVCRS2 
SXO 
SXO1 
SYSORG 


TAB 
TAU 
TBADDR 
TBC 
TBLOO 
TBL24 
TBLK 
TDRV 
TEMPO 
TEMP‘ 
TEMP2 
TEMP3 
TEMP4 
TEMPS 
TEMPHL 
TESHI 
TEST 
TESTB 
TESTBO 
TESTB4 
TESTC 
TESTC1 
TESTX 
TFCN 
TFILE 
TFREE 
THRUFL 
TIM3X 
TIM4X 
TIM4X4 
TIMA4Y 
TIM4Z 
TIME‘ 
TIME2 
TIME3 
TIME4 
TIMES 
TIMX4 
TIMX2 
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0417 
0452 
049C 


0476 


027A 
eee 
eee 
eee 
eee 
0904 
0528 
0537 
053D 


UPDATE 
UPTIM 


VCRAD 
VCRSY 
VEQO 
VEO‘ 
VEQ2 
VEO3 
VEO4 
VECTO 
VECTO1 
VECTY 


ZRAM 
ZZZZZZ 


PRODUCT REVIEWS 


IDA, software debugger 


Joseph Norris 


COLORWORD, word processor, screen editor 


These two software packages have been 
long overdue for review by a Com- 
pucolor publication. Part of the delay 
has been caused by revisional activity by 
the authors, but the real delay has been 
the lack of adequate marketing efforts 
for US buyers. Colorcue hopes both 
these programs will receive the attention 
they deserve as the latest products 
directed to the Compucolor/Intecolor 
owner. 


IDA, By BILL GREENE. $49.50 
(INTELLIGENT COMPUTER SYSTEMS) 


IDA is a software debugging program 
by Bill Greene. Bill is also the author of 
Super Monitor, Super Monitor Plus, 
Compucalc, and an edition of FORTH, 
as well a a few games. He has been a fre- 
quent contributor to Colorcue since its 
very beginning. 

It’s difficult to give a straightforward 
review of IDA, because after using it 
daily for several months, I can’t think 
of anything but superlatives. IDA is the 
topic of the tutorial in this issue by W.S. 
Whilly, who begins a fascinating ex- 
ploration of IDA’s possibilities. He has 
only scratched the surface. To be 
straightforward, it is my opinion that 
should I lose all my other software, I 
would hope to keep IDA. It is brilliant- 
ly written. It is a flawless performer. It 
is the greatest timesaver imaginable. 
IDA ic usually the first software I call 
upon at power-up, and the last I use 
before dragging my mortal remains to 
bed. Had I owned it three-years ago, I 
might actually know something about 
the CCII at this point. It is certain I 
would have spent much less time head 
scratching and reconstructing lost disks. 


IDA is an (I)nterpreter, (D)isassembler, 
and (A)ssembler, monitor, calculator 
and debugger all wrapped within 8K 
bytes of magic. It is available for loading 
at 4000H, 8200H, AOOOH, and EOOOH. 
IDA.REL is also available for 
macroassembler users for loading at any 
address in user memory. It will operate 
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with v6.78, v8.79 and v9.80 software, 
and there is work in progress to make 
it available to 8000 computer users as 
well. 


IDA does all of the following, and then 
some: a) makes an ASCII dump of 
memory, b) sets printer Baud rate, c) 
sets checkpoints, d) disassembles 
memory, e) prints SRC files, f) fills 
specified memory with a constant, g) 
runs assembly programs, h) makes a hex 
dump of memory, i) interprets assembly 
programs with a register dump, j) allows 
addiion of user-defined jump table 
parameters, k) compares designated 
memory locations, 1) prints any screen 
display to printer, including displays you 
type there (in simulated CRT mode) for 
clarification of screen data, m) moves 
designated memory, n) makes decimal 
dump of memory, 0) sets origins for 
pseudo-assembly of mnemonics from 
keyboard directly to memory, p) peeks, 
with an option to poke, at any memory 
location, q) exits to FCS, s) searches 
memory for byte string, with option to 
disassemble, replace with designated 
string, or present a peek/poke mode, t) 
types keyboard lines to printer, v) 
displays directory with usual display 
plus file length in hex and decimal, x) 
executes any FCS command without ex- 
iting IDA, z) sets lines/page and blank 
line format for printouts. 


While IDA has more capability that any 
previously-issued program of its type, it 
isn’t what it does that is so impressive; 
it’s how it does it! This is difficult to 
describe in text (you’ll do better if you 
follow W.S. Whilly’s article). The large 
figure on the next page is a ‘‘snapshot”’ 
of an IDA screen following a 
disassembly from address 8200. Follow- 
ing the IDA prompt is my instruction to 
disassemble 10 (hex) program lines 
beginning at 8200. IDA displays, in 
order of column, the memory address, 
a grouping of hex digits associated with 
that address, a translation of those digits 
to mnemonics, and, in the last column, 
an interpretation of the hex digits as 
though they were not program code. 


Notice the lables ‘‘IPCRT”’’, “SICRT1’’, 
and ‘‘KBDFL’’ in the last column. IDA 
has recognized these addresses from the 
disassembly and printed the system 
names for them —for my convenience. 
This is a colorful display column, each 
number being colorcoded to establish its 
ranking in the 256 possible characters 
available in the CCII. You can readily 
identify a printable ASCII character, a 
control code, or a special character. 


Is this particular instance, when the 
display reached the line of address 8226, 
I pressed the [UP/ARROW]. A blue bar 
cursor appeared on the screen. I held the 
[UP/ARROW] key until the bar cursor 
moved up to the line it is shown on in 
the figure, address 820A. IDA now lets 
me do a number of things at this ad- 
dress: I may use a Peek/Poke option to 
enter new hex digits at this address, I 
may set this address as an origin for 
assembly and actually type in 
mnemonics at the keyboard, which will 
be instantly assembled and inserted, 
beginning at address 820A. 


The ease with which this kind of pro- 
cedure is carried out is not adequately 
expressed with words. Similarly, all of 
IDA’s functions act with ‘‘forethought’’ 
which is to say — the program ‘‘knows’’ 
what you are likely to want next, and 
presents itself for your service accor- 
dingly. It is clearly the work of a master. 


The simple feature of making FCS com- 
mands available from IDA without a 
program exit is a remarkable time-saver. 
No perpetual reentries to IDA, no lost 
jump vectors from ESC USER. IDA 
reveals, with ease, any mystery the disk 
drives hold. All sectors are there to be 
read with a simple command. All sec- 
tors may be rewritten with a simple 
command. 


Calculate with any combination of 
binary, hex or decimal numbers, using 
arithmetic operators, or the MOD, 
AND, OR and EXOR functions. Save 
yourself from tedious calculations with 
IDA’s display of disk file size. Convert 
an LDA to a PRG in seconds. Repair 
bad Basic program lines in a jiffy. Cor- 
rect a bad disk directory. Do anything 
you ever wanted to do but couldn’t. 


Selectively run an assembly language 
program, One instruction at a time, and 
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FCS>LOAD PNTLOW.PRG 
FCS>RUN IDAE 


1DA>D8208 16+ 


219068 H,@806H 

39 SP 

22E188 88E1H 
SP, 8FFFH 


81C4H 


A,arn 
81DFH 
H,8C18H 
M,@1H 

rs 

891 2H 
8913H 


321489 8914H 


A SAMPLE IDA SCREEN 


watch the registers change...or run six- 
teen lines at a time, or stop at preselected 
places of your choosing and examine the 
registers and memory to see what hap- 
pened. Look at the stack and watch it 
change. 


All these things are not only routine with 
IDA, but so logically executed and 
displayed, it’s difficult to remain ig- 
norant about anything for very long. 

There must be a catch somewhere! 
There is. IDA’s manual is painfully 
skimpy. Trying to find out how to make 
these provisions come to life reminds me 
of my early days with the Compucolor 
manual from ICS. The first IDA 
manual was a skeleton. Subsequent revi- 
sions have been improving, but you will 
be blind to IDA’S power without articles 
like Mr. Whilly’s or a few daring ses- 
sions at your own keyboard, exploring. 


There are plans at Colorcue to produce 
a manual for IDA worthy of its content. 
But, for goodness sake, don’t let a poor 
manual stop you! Get IDA quick, and 
join us. IDA will be everywhere in the 
pages of Colorcue. It does for the en- 
tire computer what ‘THE’ Basic Editor 
and FASBAS have done for Basic. The 
price is a sinfully modest $49.95. Order 
from Intelligent Computer Systems in 
Huntsville, Alabama. (See their catalog, 
this issue.) If you want a version for 
3651 or 8000, write to me at Colorcue. 
This is a program you’ll cherish. 
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COLORWORD, By Curis TEo. $50. 
(PROGRAM PACKAGE INSTALLERS) 


CCII users have used Comp-U-Writer 
for years. It’s a very respectable word 
processor at a very high price. One ma- 
jor drawback of Comp-U-Writer is its 
inability to process control and escape 
commands to take advantage of the 
various facilities of modern printers. 


COLORWORD removes the price and 
printer support deficiencies of Comp-U- 
Writer in one $50 stroke. COLOR- 
WORD does not have Comp-U-Writer’s 
‘*polish’’, and COLORWORD has its 
idiosyncracies, but it works, and if you 
court it appropriately it will serve you 
well. 


The latest revision is v4.5 which contains 
a new sign-on display (I liked the old one 
better—less cluttered), keyboard buffer- 
ing, and a capacity to reformat 
paragraphs. Current COLORWORD 
users might want to make the $15 invest- 
ment to get these improvements if they 
were Out-typing the software and were 
constantly losing lines of text from the 
screen. 


COLORWORD offers the following, 
more or less standard, word processing 
facilities: 

Line editing —delete character, delete 
line, delete all text, insert character, text, 
page markers and-control characters. 


Block editing —delete, move, copy, 
save, and print block. 


File commands —save, load, initialize 
disk, print directory, delete file, rename 
file, change device. 


Cursor control —up down, left right, 
down/up single or multiple lines, single 
page. 

Printing —Screen preview of printout, 
print text, set printer parameters (in- 
cluding control and escape codes 
anywhere in text). 


Special functions —string search with 
optional replace, operate with or 
without lower case character set (but 
print either to printer), HELP facility, 
typematic keys, compact file storage, 
generates SRC-type files, will process 
any SRC files, 21K or 27K text area, can 
be used with any CCII keyboard, 
available for loading from disk at 
4000H. 


COLORWORD’s manual is thorough 
and clearly written (18 pages). The only 
difficulty with this program is learning 
to live with it’s peculiarities. A double 
RETURN is required to establish a 
paragraph boundary. When editing (ad- 
ding) words in the midst of a paragraph 
you will frequently encounter the 
‘vanishing line’? syndrome—entire lines 
of text disappear from the screen 
forever. They are in memory, and they 
print out, but they are invisable. There 
is a way out of this dilemma, faintly 
referred to in the manuals of earlier ver- 
sions, more carefully annotated in v4.5, 
but one must be on one’s toes to keep 
the demon away. COLORWORD is 
sometimes erratic in other ways, par- 
ticularly if you have unusual margins 
set, or use tabs too much. I haven’t 
found a problem I couldn’t circumvent, 
but I have resented the time I had to 
spend courting the software when I had 
pressing work to do. I admit, I have fre- 
quently abandoned COLORWORD for 
Comp-U-Writer. At the same time, the 
price is right, and it works as advertis- 
ed. If you’ve not been able to use a word 
processor because of a limited budget, 
COLORWORD is for you. It will be a 
good friend. COLORWORD works 
with v6.78, v8.79 and v9.80 computers. 
It is available from Program Package 
Installers in Australia. (See their adver- 
tisement in this issue.) Don’t let their ad- 
dress deter you. PPI is prompt and sup- 
ports its products conscientiously. 
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This article has originated from my experiences with the 
compiler, FASBAS, following the notion that some of the 
subroutines contained in the Basic interpreter in ROM might 
be of value in Assembly Language programs. It might be 
useful to access subroutines for square root, COS, TAN, 
etc, or the random number generator. The procedure for 
achieving this is somewhat complicated, but it can be done. 


The Basic subroutines all operate on floating point 
numbers, to handle a wide range of values with accuracy 
to 5 or 6 decimal places. I assume that Assembly Language 
programs are going to treat all numbers as integers, express- 
ed as 8 bit or 16 bit binary values. So we must establish a 
convention, and I propose that any number which is to be 
operated on by a Basic subroutine must be loaded as a 16 
bit value in the DE register pair. Similarly the result of the 
operation will appear as a 16 bit value in the DE register 
pair. To accommodate negative values, the most significant 
tit will be a sign indicator (1 for negative) and thus a range 
of integers from -32768 to + 32767 can be expressed. This 
is the normal convention for signed 16 bit binary, in which 
positive values are counted upward from 0 to 7FFFH, and 
negative values are counted downward (FFFFH = -l, 
FFFEH = -2, etc). 


So far the strategy is simple and can be described in the 
following list of steps: 


1) Load 16 bit signed value into DE register pair, 2) Call 
subroutine to convert to floating point, 3) Call required 
Basic subroutine, and 4) Call subroutine to convert back 
to 16 bit signed value in DE register pair. 


The primary problem is that the value returned by the 
Basic subroutine will, in many cases, lie between 0 and 1, 
and will appear as a value of 0 when converted from floating 
point to binary integer. We can circumvent this by multiply- 
ing the floating point number by some scaling factor (such 
as 100 or 1000) before converting back to integer form, but 
this is not as straightforward as it seems. 


The Basic subroutine for floating point multiplication is 
not wholly self-contained in ROM. In order to use it we must 
first call another subroutine which loads instructions into 
the memory area 8200H to 8298H. Therefore, your program 
must, at an early point, include (just once) the following 
instructions (in this and subsequent listings, the Basic 
subroutine address is given for v6.78, followed by v8.79 in 
brackets): 


CALL 17DEH [372DH] ; Load 8200H to 8298H 


Your program cannot itself be loaded at any address lower 
than 8299H, as it would be overwritten by these Basic 
instructions. 


We need a clear understanding of the order in which Basic 
carries Out a series of mathematical operations, and where 
it stores intermediate results. Basic uses the memory area 
80DEH to 80E1H as a 4 byte accumulator for floating point 
numbers, and results of all operations are stored here. If 
the expression COS(X)*100 is to be evaluated, the sequence 
of operations is as follows: 


1. Put the floating point value of X in the accumulator, 
2. Call the COS subroutine (result in the accumulator), 
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3. PUSH the contents of the accumulator onto the stack, 
4. Put the floating point value 100 in the accumulator, 
5. POP 4 bytes [=COS(X)] from the stack to registers 
BCDE, 

6. Call the multiplication subroutine (result in the 
accumulator). 


This example could be extended to divide the result by 
Y, in which case Steps 7 and 10 would be very similar to 
Steps 3 and 6: 


7. PUSH the contents of the accumulator onto the stack, 
8. Put the floating point value of Y in the accumulator, 
9. POP 4 bytes (= COS(X)*100) from the stack to registers 
BCDE, 

10. Call the division subroutine (result in the accumulator). 


Two points are worth noting. If X is to be divided by Y, 
then X must be in registers BCDE and Y must be in the ac- 
cumulator (and similarly for X-Y). The second point is that 
all the registers are used during these operations, which may 
help to explain why Basic moves values from the ac- 
cumulator to stack and thence to registers BCDE, to keep 
them safe during Steps 4 and 8. It should also warn you that 
if you want to retain the contents of any registers, you must 
PUSH them onto the stack before calling any Basic 
subroutines. 


Using Basic Subroutines in 
Assembly Language Programming 


Peter Hiner — 11 Pennycroft Herts, ALS 2PD 


Harpenden ENGLAND 


We are now ready to consider the full sequence for ac- 
cessing a Basic subroutine from an Assembly Language pro- 
gram. I will use as an example a routine to evaluate the Basic 
expression INT(RND(1)*100) + 1, which generates a random 
integer value between 1 and 100. I assume that you have 
previously carried out the instruction CALL 17DEH 
[372DH] to load Basic routines into the 8200H-8298H 
memory field. (See Listing 1.) 


Note that the subroutine at 134FH [329EH] should always 
precede CALL 114AH [3099H], even when you are sure the 
result will be positive. 


Listing 2. is a sample of simple subroutines which could 
be used in the example of Listing 1. where RND was used. 
For the arithmetic functions, remember that X must be in 
registers BCDE and Y must be in the accumulator. (See 
Listing 3. for arithmetic functions.) 


A routine to evaluate 3 to the power of 5 is shown in 
Listing 4. This routine returns a value of 729, so there is 
no problem, but 3 raised to the 10th power would yield 
59049. The hexadecimal value in registers DE would be 
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Listing 1. 


LX] D,1 ; Load 1 for RND(1) ! 
CALL 1A5AH [393ah] ; Convert 1 to floating point ee 
; - value in accumulator hal 
CALL 16D@H [361FH] ; RND subroutine generates sat 
; RNDC(1) in accumulator 
CALL 13886H (32CFH] ; Put RND(1) on stack Listing 2. 
LX] D,168 ; Load scaling factor = 168 
CALL 1ASAH [393AH] ; Convert to fp in accumulator Function..vé.78..¥8.79 
POP 8B ; Pop RND(1) from stack to BCDE 
POP D ; SQR 15F8H 3547H 
CALL 12A3H [31F2H] ; Multiply RND(1) by 168 RND 16D6H 361FH 
CALL 134FH ([329EH] ; lest for positive/negative result LOG 1263H 31B2H 
CALL 114AH [38699H] ; Convert result to integer in DE EXP 163FH 358EH 
MOV 6OA,E ; D=@, E=8 to 99 cos 1784H 3653H 
INR A ; Now A=1 to 188 SIN 1786AH 3659H 
TAN 176BH 3é65AH 
ATN 1786H 3é6CFH 


E6A9H, which, according to our convention for signed 16 
bit binary integers, we should evaluate:as -6487. Clearly you 
can, in practice, treat results between 8000H and FFFFH 
as positive numbers in the range 32768 to 65535, provided 
that you know what range of result to expect from the Basic 
subroutines. This does not apply to values at entry to Basic 
subroutines, which will always evaluate FFFFH as -1, etc. 
If you try to evaluate an expression which gives a result out- 
side the range -32768 to + 65535, then you will find that 
the program jumps into a Basic error subroutine which gives 
you a CF ERROR message. Intermediate floating point results 


outside this range are acceptable provided that you divide 
by a scaling factor (or add/subtract a suitable value) to bring 
the result back into range before converting to a binary 
integer. 


A final point to remember is that the conversion from 
floating point to integer values always gives as a result the 
lower of the two adjacent integers, and does not round the 
result to the nearest integer (e.g. 5.9999 becomes 5 rather 
than 6). You probably expected this, but you may be sur- 
prised to learn that -5.001 becomes -6, which is at least con- 
sistent if not entirely logical. () 


Listing 3. Listing 4. 
Function..vé6.78..v8.79 
LX1 D,3 
Moe ¥ 1167H 3@6Bé6H CALL 1ASAH 
x - Y 1164H 36B3H CALL 1386H 
xX *# Y 12A3H 31F2H LX] D,5 
x7 'Y 12ESH 3234H CALL 1ASAH 
x TTY, 16@63H 3552H POP 8B 
POP OD 
CALL 166@3H 
CALL 134FH 
CALL 114AH 


rt me) 
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[C393AH] 
C32CFH] 


C393AH] 
{3552H] 


[329EH) 
C3699H) 


Convert to floating point 


Put 3 on stack 


Convert to floating point 
POP value 3 to BCDE 


Subroutine for “* 


Integer in registers DE 


Test for positive/negative result 
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one dimensional cellular automata 


David Suits 


49 Karenlee Drive 


Rochester, NY 14618 


By now almost everyone who has work- 
ed with computers has learned of the 
game of LIFE, in which the screen is 
conceptually divided into hundreds of 
squares (cells), and each cell is treated 
as containing a living organism 
(represented, say, by an asterisk) or else 
treated as dead or empty (represented by 
a blank)..On the Compucolor/Intecolor 
it would be appropriate to set up the 
screen as a two-dimensional array of 
cells, 64 wide and 32 high. Given an in- 
itial number of live cells, placed hither 
and yon on the screen (usually at the 
discretion of the user), it is interesting 
to watch what happens when certain 
rules of transition are applied to each 
cell in the array and the new result 
displayed. In the original L/FE there 
were three rules (or four, depending on 


how you expressed them) for determin- 
ing when a live cell ‘‘dies’’, when an 
empty cell ‘‘gives birth’’ and when live 
cells stay alive. For example, if a live cell 
is touching less than two other live cells, 
the cell dies; when an empty cell has ex- 
actly three live cells as neighbors, it gives 
birth to a new live organism. 


A program to run the game of LIFE 
would set up the initial two dimensional 
array, then check each cell, counting the 
number of its live neighboring cells and 
applying the appropriate transition rule. 
When the entire array has been check- 
ed, the program would display the 
results and then start the transition pro- 
cess over. This would continue ‘ad 
libitum.’ It is fascinating to watch 
cellular patterns emerge and dissolve, 
especially if the program is implemented 


in assembly language. 


There is nothing sacred, however, 
about using any particular transition 
rules which specify when a cell dies or 
when it stays alive, etc. You can make 
up your own rules for experimentation. 
You can also expand upon the concept 
of a’’live’’ cell: you could have different 
**species’’ of orgamisms which interact; 
each species might have slightly different 
transition rules. 


The game of L/JFE is an instance of 
*‘two dimensional cellular automata.’’ 
Could there be one dimensional cellular 
automata? Sure. Instead of n lines of c 
cells each, you would deal with only 1 
line of c cells, and the transition rules 
would have to deal with a cell’s 
neighbors to the left and right. (A cell 


® Compucolor Hardware Options @¢ 


®& LOWER CASE Character set. (Switchable) MSC12 


*%& MULTI-CHARACTER sets. 


$29 


(Lowercase, Electronic, Music etc.) $39 


W® REMOTE DEVICE CONTROLLER. Switch ON/OFF 8 devices. PSCl $65 
®& 16K RAM Upgrade. (Increase from 16K to 32K.) 


$99 


W® 24K EPROM board (3x8K) with bank switch selection: $60 


" tt " 


®& 8K ROMPACK for external EPROM exchange: 
Cable and socket for ROMPACK. Cable connects to EPROM board:$25 
Blank EPROMS (Type 2732) 


Ww 8K RAM board. 


4000H Software: 


with keyboard/software selection: $85 


$15 


For each 8K: $10 


(Also includes sockets for extra 8K EPROM): $65 
COLORWORD, SCREEN EDITOR, ASSEMBLER, 


GEN. LEDGER, THE EDITOR V3, DRIVER, WISE-II, GAMES etc. $10-50 
(FCS update chips: V6.78 $12. V8.79 $28 if required.) 


rPi 


PROGRAM PACKAGE INSTALLERS, 
P 0. Box..37,; 


DARLINGTON, 
WESTERN AUSTRALIA 6070 
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All prices 
incl. airmail. 
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GOTO 4380@ : REM POKE IN NQ-ECHO PATCH 
’ a KER KHKA KERMA KE LEE E EKER EERE RAKE RAE RARER EAE EERE HEF E EERE 
would have no neighboring cells 


¥ 
above it, because the line above REM * CELL1ID -- One dimensional cellular automata pra- #* 
would represent the previous gen- REM * gram. % 
eration; and it would have no “tt A B. 8. Suite. Maret : 
neighboring cells below it, because ae "2 Cae Mey is ¥ 
that would be the next generation REM # See Brian Hayes Nee uter Recreations" in % 
which would not yet exist.) In the at . SCIENTIFIC AMERICAN, March, * 
; Lees 2 
March, 1984 issue of Scientific REM 4X KKH KER K HERE HE ERK ERA KEK KE KEE RAE HERE REE REAR REALE 
American, Brian Hayes discussed REM 


one dimensional cellular auto- 
mata, —a sort of game of LIFE 
played on only one row at a time 


Q 

j 

] 

1 

| 

1 

j 

1 

j 

1 

| 

2 

3 

: RGT=127 : REM oe i of line *@--RGT). 

é 
instead of a full screen. One inter- 

j 

1 

j 

1 

j 

1 

j 

1 

1 

1 

2 

4 

2 

Z 

2 


T@P=127 : BOTT@M= 

KB=33278 : KF=33247 : REM Addresses for Keyboard reading. 
ALIVE=-1 : DEAD= NOT ‘¢ALIVED 

COL@R=2 : REM PLOT 6,COL@R for plotting live cells. 


esting aspect of this is that each M LINECRGT) TEMP (RET) 
M 


new generation can be displayed 
on each line of the screen, so that 
the original line is seen as ‘‘grow- 
ing’’ from the top of the screen 
down (or, if you wish, from the 
bottom up.) 


REM Define the transition function for each cell. In the 
REM co. version, a cell becomes ‘ar stays) alive if 

he total number of live cells 2 positions on either 
R 7 side of the present cell is either Z or 


j Count live cells in 2 spots left of cell X., 
_ Implementation of a one dimen- DEF FNL2(X)=-(LINE(X-1)=ALIVE) -(LINE(X-2)=ALIVE) 
sion cellular automaton on the REM 
Compucolor or Intecolor com- REM nt 


Cau live cells in shar) ees of cell X. 
puters is easy using plot graphics, Las FNR2 CX: J=-f LINES x+1 acie Y-€ LINE X4+2)=ALIVE)D 


where each plot block represents Baro 1ag@a 
one cell (’’alive’’ if the block is on, 258 REM 


“dead”? if not). Thus, a one 26@ REM This is the actual, called subroutine. It makes use 
dimensional cellular automaton ‘ 278 REM of functions L2 and R2 above if possible. X is the 
could be 128 cells long, and you ce ea By crens x is okt ig’ ye ere Neighbor Count. Boundary 
could display 128 lines or genera- 388 REM ae ei aee 5 Me Siig 
tions on your screen. (If youhave 318 IF X=@ THEN NC=FNR2(X) : GOTO 366 
a hice, You can pet even larser 338 IF XERGT <1 THEN NGCENL 20%) -(LINECRET=ALIVE) : GOTO 368 
hi t l = = } «RGT =F )} + & 36 
See esta ond orine thovcande of 348 IF X=RGT THEN NC=FNL2<X) : GOTO 360 
automata and print thousands of 350 NC=FNL2¢X)+ENR2CX) 
generations.) 348 REM 
Various transition rules for 376 REM The result is either a live cell or a dead cell, 
determining when a live cell dies, aue 26 based upon the Neighbor Count. 
when a dead cell gives birth, etc., 448 IF (NC=2) OR (NC=4) THEN TEMP<X)=ALIVE : GOTO 426 
can be invented. Some transition 418 Hf ail 
N 


HWM |-DOONAULWNKVEVVeO@2eD0O JRO CNa oN @ 


DOOWOOIVOVoV2e2eOo0om 
A 
m 
2 


rules will result in an uninteresting 426 

growth (or decay) of cells; others pA Ant Oey Bh tea ot ae ce EN Mee Bo dine ihe ele te! css 
will generate unexpected, plant- 988 REM 

like ( or crystal-like ) structures, 916 REM ssssssss22sss22sss2e2seSe22s222essesssee=sSesssS2===== 
often with surprising symmetries. 928 REM 


Listing 1 is a BASIC program 949 REM 
which implements a one dimen- 956 REM £ssesssesss22s2ss2ss2ss2Se22s2e2=ssesSSSSS=SSSS====2=S== 
sional cellular automaton which 968 REM 


begins at the top of the screen. 
Each new generation is displayed 
on the next line down. The transi- 
tion rule used is simple: for each 
cell in the line, count the number 
of live cells two cells to the left and 
two cells to the right of it, and add 
1 if the cell itself is alive. If the 
total is either 2 or 4, then the cell 
itself becomes (or remains) alive. 
Otherwise, it becomes (or remains) 
dead. 
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@06 : REM Set up and instructions. 
GOSUB 3608 : REM Get initial line. 
3,6 


PLOT gs 4,@,6,COL@R : REM Hide cursor; set color. 
PLOT 2 REN” Plot made. 
REM Dis ae AL line at to 
FOR X=8 ato R FA 
IF LINE CX)=ALIVE THEN PLOT X,T@P 
NEXT 
REM 
REM Main loop. 
FOR LINE=T@P-1 TO BOTT@M STEP -1 ; ; 
see aie 4066 : REM Calculate and display next line. 


17 


The program is rather slow, so 
have patience. You can _ insert 
some speed-up tricks, but 
translating the program into 
assembly language would repre- 
sent a major speed improvement. 
(It might be interesting to try a ver- 
sion in FORTH.) 

In the BASIC program, the in- 
itial line of live/dead cells is 
entered from the keyboard. The 
echo is turned off, and a two-high 
by one-wide plot block ‘‘cursor’’ 
is drawn. Pressing the space bar 
enters a ‘‘dead’’ cell and advances 
the cursor. Pressing any key other 
than the space bar and RETURN 
enters a “‘live’’ cell and advances 
the cursor. Pressing RETURN 
Signals the end of input, the rest 
of the line is filled with ‘‘dead’’ 
cells, and the automaton begins its 
slow growth downward. —_ 


COMP—U—WRITER 


The popular word processor is still 
being sold. It was written by a 
company called INTERSELL for 
use on the Compucolor and In- 
tecolor series of computers. 
Several readers have written to 
Colorcue with questions about the 
support for this software. We can 
only give you the names and ad- 
dress of the originators of the pro- 
gram and suggest that you contact 
them for further information. 


INTERSELL 
465 Fairchild Drive 


Suite 214 
Mountain View, CA 94043 


Software: Thomas Crispin 
Manual: Robert Moody 
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acs oc 


ON LA LU a RS 


Doe DADA Da ocqyes —- +e SH 
Re De Do Dw Sw cH com ce a 


LO CIHIPIPO BIBI PIO RIP ROP RR ee Ree ee 


oe Ss Bs FO OWI HOO OO WU WO tO Oo 
CS) CS RRND dO Pad Bd Pad ee ee ee ee ee 
LOR COO OAS DOR OD OR OU cine 
ADIDAaUOOSOrOser assesses sosaas 


Cr. OK OR OR OR OR De On OR. De De 
19 609 3 9 I CO POS Pa em 
BwDsDmBDw ain 
CT G3 he oD ce Ce 
BWoOpDse Sasa waco 


REM 
PLOT 255 : REM Exit plat mode. . | 
INPUT ""SA$ : REM Wait without destroying display. 


REM Set up and instructions. 

PLOT 6,46,29,19,12 

PRINT 64073 CELLULAR AUTOMATA" 

PRINT 

PLOT 135 : ae 
PRINT “Enter initial line. A space will ETORND wi a “dead 
PRINT “cell, and any other key (except RETURN) will Signal” 
PRINT "a ‘live’ cell. Press RETURN when done. 

RETURN 


REM Get intial line. 


PLOT 64,@ : REM Hide cursar. 

POKE ce 3{_: REM No-echo. 

Cx=4 CY=98 : REM PLOT X,Y for inputting initial line. 
30 : REM Flag on so 2nd PLOT erases previous block. 

PLOT &,COL@R,2 


1 GOSUB 3276 : REM Display "cursor". 


POKE KB,@ 

A=PEEKCKB) : IF A=@ THEN 3120 : REM Wait for key. 

IF A=13 THEN 318@ : REM "RETURN" for end of entry. 

GOSUBR 3278 : REM PLOT “cursar" a 2nd time to turn it off. 
IF A<sasee" "> THEN PLOT CX,CY : LINECCX)=ALIVE : GOTO 3178 
LINE*X)=DEAD 

CX=CX+1 : IF CX<=127 THEN 3108 

POKE KF,12 : REM Turn on echo. 

REM Fill out initial line if necessary. 

IF CX<RGT THEN FOR 1=CX TQ RGT : LINECI2=DEAD : NEXT 

PLAT 255,29 : REM Exit plot mode; reset flag. 


REM Plot the “cursor” 
PLOT cx CY. CK  C¥AS RETURN 


REM Calculate next generation. 
FOR x=8 TO RGT 


GOSUB 314 : REM Get new qeneration in TEMP). 
IF TEMP¢CX=ALIVE THEN PLOT X,LINE 


REM Transfer TEMP¢) to LINE). 
FOR X=LFT TO RGT : LINECX)=TEMP(X) : NEXT 


RETURN 

REM 

FE re er re ey RIT ie eons te BNE ae elm ce a i ep i ce st ers os mit 
REM 

REM Ben Barlow’s No-echo patch. 

REM 

RESTORE 63008 : DATA 245,175,56,255,129,241 , 261 
TH=256*PEEK (32941) +PEEK« 42940) -? 

FoR x=1 TO 7? : READ D : POKE TM+X,D : NEXT 
BR=INT(TM’254) : POKE 33221,195 : POKE 33222 ,TM-BR¥256+1 
POKE 23223,BR : POKE 32941, RR : POKE 32948 ,TM- BR¥256 
CLEAR 5@ :; GOTO 18 
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I am aware of the patronizing attitude taken by some in- 
dividuals, who learn something of value, perhaps print a 
few silly articles, and then retire with their wisdom forever. 
They reach some kind of summit from which they can no 
longer share, and decide all further questions are stupid. 
Have you, for example, ever seen an article that tells how 
to perform routine system debugging? Now you know why 
I have emerged from obscurity. 


The idea of ‘‘bugs’’ in a computer system derives, so 
legend has it, from early experiences with vacuum tube 
computers at the Department of Defense, which were known 
to fail because of nests of moths and other little creatures. 
From this, we speak of our failures as being the responsibili- 
ty of ‘‘bugs’’ in almost anything. So a ‘‘debugger’’ is meant 
to remove the human errors from software and hardware 
systems. We are discussing software debuggers. 


There are five software debugging tools currently available 
for the CCII and 3651 computers; MLDP by ISC, DEBUG 
and NEWBUG by Com-tronics, Super Monitor Plus and 
IDA by Bill Greene. These are listed in increasing order of 
versatility, in my opinion, although each has its own special, 
useful features. MLDP differs from the others by its lack 
of printing facilities and is frustrating in this regard for 
serious programming. MLDP does, however, have a uni- 
que monitor which we shall examine next time. Most of the 
others are somewhat similar in their capabilities, but IDA 
stands out far above the rest. If you don’t have IDA you 
are missing the companionship of a true friend, for it is the 
best there is, and an invaluable working and teaching aid. 


These articles will tend to focus on IDA , but if you have 
one of the others and don’t want to purchase IDA, I will 
include for you those commands which are somewhat com- 
parable in MLDP and DEBUG, as far as they go. Super 
Monitor Plus is a ‘‘subset’’ of IDA, so many of IDA’s com- 
mands will work with it as well. In addition to one or more 
of these debugging programs, you will need an assembled 
version of CYPHER (at 8200H) from the MAR/APR Col- 
orcue, on a disk by itself, and another disk side with no 
valuable material on it. Any directory on this second disk 
will be obliterated in the course of this article. Your work 
will be facilitated by a printout of the assembly of CYPHER 
(see Colorcue Mar/Apr 84), showing addresses and 
mnemonic code. 


A ‘‘debugging’’ software tool is a program that allows 
you to manipulate the contents of an FCS file, whether it 
be a PRG, BAS, SRC, LDA, or any other kind of file. The 
debugger is most often used with PRG files, to ‘“‘run’’ them 
in selected portions and to examine what is taking place as 
they run. This kind of activity exercises the ‘‘monitoring”’ 
capability of a debugger. The debugger permits changing 
program code, in a limited fashion, without the necessity 
for reassembly, and it permits disassembling PRG files in- 
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to their source code. A good debugger will permit you to 
correct faulty BASIC code lines that are making a program 
unexecutable. You may print a file in hex number form, or 
ASCII form. You may move code from one set of addresses 
to another. The list of possible uses is truly endless. I will 
introduce you to the power of debugging in a logical and 
disciplined way, using the program CYPHER.PRG. 


A debugger is usually loaded into high memory, above 
the area used by most FCS files. This permits two programs 
to exist simultaneously in memory. In these articles the 
debugger is called the ‘‘instrument’’ and the program be- 
ing worked on is called the ‘‘subject.’’ If the subject code 
occupies some of the memory required by the instrument 
then debugging in the normal way is made impossible. If 
the subject only uses instrument memory to store data files, 
then debugging is still sometimes possible, even with this 
conflict. (IDA is available for loading at 4000H which keeps 
it out of the way, and therefore usable with any program 
that will fit into 32K CCII memory.) 


To set up the instrument, the usual procedure is to load 
or run the subject program first from FCS. The LOAD in- 
struction defaults to LDA, so if your program has a dif- 
ferent file type, the load instruction must contain the file 
extension; example: LOAD CYPHER.PRG. With this com- 
mand, CYPHER will be loaded into memory but will not 
‘‘run.’? If the RUN command is used, the default type 
becomes PRG, so the command will read: RUN CYPHER. 
In this case, CYPHER will load and run both. To stop pro- 
gram execution, press [CPU/RESET] to exit, and [ESC] [D] 
to return to the file control system. 


Debuggers will generally load at several of the addresses 
4000H, 8200H, AO00H, and EOOOH (look at the available 
loading addresses of your instrument on its disk directory, 
then pick a version that will load safely out of the way of 
your subject program). The last letter of the IDA name is 
the first letter of the loading address. (Some IDA versions 
are just named ‘‘8.PRG’’, ““E.PRG’’, etc.) IDAE loads and 
runs at EOOOH. IDA8 loads and runs at 8200H, and so forth. 
If you have 16K memory and a subject at 8200H, then you 
must satisfy yourself with MLDP16 or DBUGI6, or IDAA 
at AOOOH. If the subject program loads at EOOOH, then your 
debugger will have to be loaded below that, say at 8200H, 
so it does not conflict with the subject. To invoke the debug- 
ger, type from FCS a run command with the debugger name; 
example: RUN IDAE, or RUN DBUG32, or whatever. 


Now it’s time to get your feet wet. ‘““LOAD” 
CYPHER.PRG, and when the FCS prompt reappears, RUN 
IDAE or some other instrument (into high memory). 
CYPHER begins at 8200H and ends at 847DH, so any of 
A000H, E000H or 4000H will do for the instrument. Since 
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we’re loading into high memory, version ;02 of MLDP and 
DEBUG will be used, so a version need not be specified 
(unless you have ;03 for some reason): 


(Note: Later versions of IDA use (ESC) for exits from all 
IDA functions. {ESC) will replace [DOWN/ARROW] where it 
is specified in these articles.] 


DBUG32: 


FCS)>RUN CYPHER 
(CPU/RESET] CESC) (D0) 
FCS>RUN DBUG32 
COMMAND > 


IDA (SUPER MONITOR): 


FCS>RUN CYPHER 
C{CPU/RESET] CESC) [D] 
FCS>RUN IDAE 

1DA> 


MLOP: 


FCS>RUN CYPHER 
[CPU/RESET] (ESC) (D) 
FCS>RUN MLDP32 

DBG> 


The last lines above illustrate the instruments’ prompts, 
ready to receive a command. It is expected that when a com- 
mand line is keyed in, you will follow with a [RET]. On 
DEBUG there are some commands that will result in an 
automatic RETURN. DEBUG also performs some 
automatic ‘‘space-overs’’ on command lines with multiple 
parameters. It will take a little ‘‘getting used to.’’ We may 
now begin work. Let us look first at the elementary process 
of disassembly, in which the machine code is translated in- 
to the more readable mnemonics of the source code from 
which it was derived. The display will differ from original 
source code in that all labels will be replaced by their actual 
assembled addresses. The disassembler feature generally re- 
quires a disassembly command, a starting address, and a 
length of addresses to be disassembled. This length may take 
the form of an ending address or a number of addresses 
following the starting address. We will look at the first few 
complete code lines of CYPHER on the CRT. 


IDA>D 8268 16+ 
CDOWN/ARROW) or CESC) 


COMMAND>S 8288 821F 
DBG>DS 8286, 286 


What is seen with disassembly varies among the in- 
struments. IDA will give the most spectacular readout (see 
LIST A), however, in this disassembly mode, most programs 
are very much alike. In List A, column 1 displays the 
memory addresses, column 2 shows the hexadecimal bytes 
located in those addresses (clustered in IDA, separated in 
other instruments), columns 3 and 4 show the disassembled 
mnemonic form of the code (columns 4 and 5 for MLDP), 
and column 5 prints a translation of column 2 which inter- 
prets memory as an array of characters and not mnemonic 
code. (In MLDP, this display appears as column 3, which 
‘‘strips’’ lower case to upper case. The only way to tell if 
you’re looking at a lower case character is to examine the 
hex code.) Look at address 820CH. The first byte represents 
the op-code for ’*>CALL’’ (CD). The next two bytes are the 
low and high bytes of the address of the CALL (2A, 18 for 
v8.79 and v9.80, F4, 33 for v6.78). This line is calling OSTR 
in ROM. If you have IDA, in column 5 you will see 
‘‘OSTR’’ printed. IDA translates all frequently used ROM 
addresses into their source code name (very helpful if you 
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are modifying a PRG file for another version of system soft- 
ware). To find what OSTR is about to print, look at ad- 
dress 8209H and you will find the HL registers loaded with 
address 82D7H, which just happens to begin the printable 
string —6,2,3,0,10, NORMAL TEXT’—etc. All the lines in 
Listing A are instructional lines of code, including the three 
NOPs at the beginning which give the instruction to do 


Now let’s move into the ‘‘high weeds’’ (as Myron used 
to say). Repeat the last disassembly but start at 8204H. You 
should get something like List B, and it looks nothing like 
List A at all until it reaches address 8206H, even though 
it has all but one byte of List A (not counting NOPs) in its 
disassembly. How come? The disassembier began to decode 
the memory contents at address 8204H, where it saw 25H, 
which happens to be the op-code for’*>DCR H.’’ The 
disassembler will try to interpret the first byte it sees as an 
op-code. That isn’t what we intend the 25H to mean. We 
mean it to be the low byte of the address of string CLR (at 


IDA)D 8208 154 List A 

8288 88 NOP 9 

8701 a NOP a 

8282 06 NOP 3 

8203 212583 LX] H,8325H 3 'C 
8786 CD2Ai8 CALL  182AK . OSTR 
8209 210782 LX]  H,8207H =; ‘WB 
878 CD2Ai8 CALL 182AK . OSTR 
820F 212083 LXI H,8320H =: 'C 
8212 3408 Ml  M,86H Fabel 
8214 23 IX oH . 4 

8215 368 Ml = M,8CH Yee 
8217 8688 MI  C,0@H -Na 8 
8219 212383 LX] -H,8323H_ ss HC 
g2i¢ 3482 NVI M,O2H o ee 
S2iE 3EC3 «MIA, C3H - C195 
8228 32058! STA S1C5H : IPCRT 
8223 218782 LX]  H,B2A7H =; 1B 
8226 220681 SHLD  8iCéH - ICRT! 
8229 3EIF «=o MV SséOA, SFH ep gy 
8228 32DF81 STA —S1DFH » KBDFL 
Q22F C35E82 JUMP § 825EH . CB 


8325H). If the computer is going to see it that way, we must 
begin disassembly in such a way that the computer will 
recognize 25H as a low byte address of a preceeding op-code, 
specifically here, 21H, the op-code for ‘‘LXI, H’’, which 
is at address 8203. To satisfy this requirement, we must 
always begin disassembly at some single byte instruction or 
single byte of independent data, such as a DB byte. Other- 
wise, we'll be ‘‘in the high weeds’’ and working against the 
wind. If you’re in a program unknown to you, then you 
must ‘‘feel’’? your way from the starting address, writing 
down legitimate starting places as you disassemble your way 
through the program. If this isn’t clear, try disassembling 
at each address in turn, from 8200H to 820BH and see when 
the disassembly is congruent to List A and when it isn’t. 
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The procedure for controlling the number of disassembly 
lines varies among instruments. In our examples, IDA is 
given the number of lines to decode (in hex), DEBUG is 
given the last line to decode, and MLDP is given the number 
of bytes to decode (hex). If the end specification falls at the 
beginning or in the midst of a two or three-byte instruction, 
the entire instruction will be decoded. 


Now, using the same technique used to generate List A, 
disassemble the code beginning at 8340H. IDA will accept 
a number of different disassembly specifications, but I like 
specifying the number of lines the best. DEBUG wants the 
start and end address. MLDP wants the number of bytes 
to decode: 


IDA>D 8348 16+ COMMAND>S 834@ 8351 


This will look very much the same for all the instruments, 
and is shown in List C. What you see in the mnemonic col- 
umns is interesting but only garbage. The ‘‘real’’ meaning 


IDA)D 8204 15¢ List B 

9284 25 a a) 
8205 83 nn 3 Cc 
9286 CD2A18 CALL 182AH —; OSTR 
8289 210782 XI  H,8207H =; ‘WB 
S20C CD2A18 CALL 182AH — ; OSTR 
g20F 212083 LX] H,8320H 3!C 
8212 3400 MI MQOH 3469 8 
8214 23 IX =H :# 
8715 3400 MI (M,OCH |O3 SL o12 
8217 8608 4 4MI COOH 83Na 8 
8219 212383 LX] 4H,8323H 3 '#C 
S2i¢ 3482 «MI 860MO2H 03 OBO 
S21E 3603 MI ACH = C195 
8220 320581 STA  B8iCSH =; IPCRT 
8223 21782 LXI 4H,82A7H =; '/B 
8226 220681 SHLD SiCsH — ; ICRTI 
9229 3E1F MI AFH 3}. 3! 
8228 320F81 STA  S81DFH —s;- KBDFL 
922E C35E82 JMP 825EH =; C*B 


of these memory contents is in column 5 (column 3 for 
MLDP)—a translation of a string of ASCII charecters. How 
do we know? For one thing, the disassembled mnemonics 
don’t make sense. For another, the ASCII translation does. 
Furthermore, using the hard copy of the assembled version 
of CYPHER, we can trace this location back to address 
8203, where the LXI H,CLR (8325H) instruction appears. 
OSTR will begin printing at 8325H and continue until it 
reaches a ‘‘239’’. (We are viewing a mid-section of this long 
string.) The first subsequent ‘‘239’’ occurs at address 8429H 
(EF). This won’t just come to you, you have to study the 
printout of CYPHER to see it. 


The subsequent area of memory contains the misspelled 
words, and we are going to correct them without reassembIl- 
ing CYPHER. Instruments allow you to change memory 
contents. Disassemble from 8352H and observe the word 
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DBG>DS 8348,12 


‘‘prmgram’’. We will first replace the bad ‘‘m’’ in 
‘‘prmgram’”’ with a good ‘‘o’’. (If you don’t have lower case, 
just use capitals.) 


IDA>D 8352 16+ 
Press (CUP/ARROW) 


COMMAND>S 8352 8362 
COMMAND>E 8358 


(Bar cursor appears) 8358: 6D- 

Hold CUP/ARROW]) (Enter 4F) ka 

until it is on “m". CRET) 
Press [P] (peek/poke) 835C: 67- 

ASCII representation [ DOWN/ARROW) 

will appear on bottom COMMAND > 

of screen. Cursor is 

under the “m." 
Now press CINSERT/CHAR] DBG>DS 8352,12 

and lower case “o". DBG>2835B 

Code will appear in 835B 6D “M’ MOV L,L 
hex, but ASCII will MEM >=6F 

not change. 835C 67 “G’ MOV H,A 
Press (RET) to exit the MEM>/ 

Peek/Poke mode. DBG> 


To see the wonderous results of your work, disassemble 
again from 8352H. We can get more practice at this by cor- 
recting misspelling at addresses 83B0 and 83DD. So do that 
now on your own. 


Reference: ‘‘i’’ (69H), ‘‘I’’ (49H), ‘‘a’’ (61H), “*A”’ (41H) 


Instruments allow you to “‘run’’ a program in memory. 
Now ‘“‘run’’ the program and observe the corrected spelling. 


IDA>G 8268 COMMAND>G 8286 DBG>R 82686 


After admiring your new spelling, note that the first ‘‘a’’ 
of ‘‘according’’ is at the end of a line, with the rest of the 
word on the following line. We can correct that easily with 
IDA. 


IDADD 8346 15+ List C 

8346 §=634 MOV DH Tr 
8341 éF MOV LA ‘6 
8342 28 + s : 
8343 945 NOV B,L cE 
8344 = 6E MOV LM : 
8345 43 MOV H,E sc 
8346 oF MOV L,A ; 0 
8347 44 MOV H,H ;d 
8348 = 65 MOV HL ; @ 
8349 28 == : 
8344 34 MOV DH a 
834B 845 MOV H,L 7 e 
834C «78 MOV A,B 2 1% 
8340 74 MOV M,H oa 
834E  2£83 MV] L ,@3H : 3 
8358 88 NOP ;@ 
8351 82 STAX 8B - 6 
8352 6682 MVI B,82H ; FB 2 
8354 54 MOV D,H 7 
8355 68 MOV LB sh 
8356 869 MOV L,C oi 


21 


Press [CPU/RESET] to exit CYPHER. Reenter any of 
the instruments by pressing [ESC] [user]. Now disassemble 
beginning at 8390 (List D). If we could place a carriage 
return and line feed after ‘‘it’’, then ‘‘according’’ would be 
altogether on the next line. The space (20H) between ‘“‘it”’ 
and ‘‘according’’ can be used for the carriage return (we 
don’t need the space at the end of the line anymore), but 
we need another memory location for the line feed. If we 
read the entire string given to OSTR, beginning at address 
82D7, we find that there is unused memory following the 
’?239”’ at address 842AH. Therefore, if we moved all the 
code, extending from 8393 to 8429, down one address, we 
would free a memory location at 8393 for the line feed. 


IDAYD 8398 18+ List D (Before changes) 


8398 = 49 MOV of oi 
8391 74 MOV MH “ts 
8392 28 “= ; 
8393 sé} MOV H.C 13 
8394 = 43 MOV H,£ < 
8395 63 NOV H,£ ae 
8394  éF MOV L,A ; 0 
8397 72 MOV M,D . of 
8398 44 MOV H,H ee 
8399 = 49 MOV ae " 
839A = 6E MOV L,M fi 
839B 6? MOV H,A ; 
839C 628 = ; 
839) 74 MOV M,H 7 
839E =F MOV L,A : 0 
b] 


839F 28 “ 


Instruments allow you to move blocks of memory. The 
MOVE instruction has a starting and ending address of the 
block to be moved, and the new starting address of the block 
after the move. The ‘‘move’’ is really a ‘‘copy’’, since the 
original contents will not be altered unless it is written over. 
IDA will move from anywhere to anywhere, but DEBUG 
and MLDP will not. For these last two, you must move the 
memory area completely outside the working area in which 
it currently resides, and then move it back in again with a 
one-byte displacement. If you have DEBUG or MLDP, fill 
the area from A000 to BO00 with 00 (to unclutter it and make 
examination easier). Move the string into that area, then 
move it back where we want it ..and think about saving 
money to purchase IDA. (My MLDP manual has an error 
for MOVE instructions. It is shown correctly here): 


IDAOM 8393 8429 8394 COMMAND>2Z AGBB BEBE 86 


COMMAND>M 8393 842A A668 
COMMAND>M A888 ABIP7 8394 


DBG>F AG66:BEG88 :68 
DBG)M 8393:842A TO Ab6B 
DBG>M A@BB:AB97 TO 8394 


(Move the range 8292-8429 tothe range beginning at 8394.) 


Disassemble from 8390 and notice two ‘‘a’’s at 8393 and 
8394. The first ‘‘a’’ can be replaced by a line feed. 
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IDA>D 8398 18+ COMMAND>E 8392 DBG> 28392 
[UP/ARROW)] to 8392 8392: 26- S392) 28 * .’ 
Press [P] (Enter @D) MEM>=@8D 
Enter 8D (at 8392) 8393: 61- 8393 61 ’A’ 
Enter BA (at 8393) (Enter 6A) MEM>=6A 
{RET) to exit [ DOWN/ARROW] 8394 61 ’A’ 
MEM>/ 


Now check it out. (See ‘after’ List E.) Run the program with ‘G 
8200’ (or ‘R 8200’ for MLDP.) 


Isn’t that better! IDA is unique in that it can move bytes 
around in a very tight space. Try this with DEBUG or 
MLDP and you’ll have an interesting experience. 


We don’t want to have to do these corrections twice, so let’s 
save a new CYPHER on disk. Note we haven’t increased 
the length of CYPHER, only changed its contents. You may 
use FCS commands to save a ‘‘memory image’’ (a picture 
of memory) on disk. This memory image just happens to 
be a working PRG program. Most instruments will make 
this SAVE from FCS, but if you have IDA, you can return 
to the instrument and do it from there. 


IDA>XSAVE CYPHER.PRG 82868-847D 


MLDP AND DBUG: FCS>SAVE CYPHER.PRG 8288-847D 
FCS>CESC) (€*) 


We will now erase all the memory used by CYPHER plus 
a little more. Instruments allow you to fill a range of 
memory with any byte you may choose. The FILL instruc- 
tion usually has a starting address, an ending address, and 
the byte with which you wish to fill: 


IDA>F 82868 8586 68 COMMAND>2 8288 8588 66 


DBG>F 8206 :8568 :66 


(Fill the memory range 8200-8500 with byte ‘‘00.’’) Verify 
the fill by disassembling from 8200H. All NOPs. 


IDADD 8398 1+ List E (After changes) 


8396 = 69 MOV bok gf 

8391 74 MOV M,H a8 

8392 68D DCR C ;M < CTRL M = cr 

8393 8A LDAX  =-B J < CTRL J = If 

8374] MOV HC a 

8395 43 MOV H,E ic 

8396 = 43 MOV H,E a 

8397 = oF MOV L,A ; 0 

8398 72 MOV M,D re 

8399 §©44 MOV H,H 0 om 

839A = 69 MOV Ly 3 Re 

839B = 4E MOV LM io 

83906? MY OHA : g RY 

839) 86.28 aig , 

Q39E 74 MMH : . 

839F —6F MOK L.A + 0 aN 
A k= 
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There is another way to load CYPHER into memory for 
further work. We know it isn’t there now. Call up your disk 
directory and write down the starting block (SBLK) of the 
newest CYPHER (the corrected version.) My starting block 
is 207. (I have an 8”’ drive. See List H.) You will use your 
own appropriate block number where I have written ‘‘207”’ 
in the instructions: 


IDA>XDIR 


DEBUG AND MLDP: [CPU/RESET) [ESC) [D) 


FCS>DIR 


We will use the FCS ‘‘REAd’”’ command to get CYPHER 
this time. Most instruments will require that you do this from 
FCS, but IDA can do it from the IDA prompt. The REAd 
command contains the starting disk block number, the start 
address in memory and the end address in memory where 
the code will be placed. We can get the start and end ad- 
dresses from the assembler printout of CYPHER: 


IDA>XREA 287 82868-847D 


DEBUG AND MLDP: FCS>REA 267 82868-8470 


FCS>CESC) [*] 


(Read from disk beginning at block 207, into memory 
beginning at 8200, until memory is filled to 847D.) 


This loads CYPHER directly. Notice how fast this load 
is. Speed is increased because the operating system doesn’t 
have to work with the directory. Disassemble from 8200H 
to verify this load. Now we are going to write a new 
subroutine into memory and use it. Notice the instruction, 
at 8206H, CALL 182A (CALL OSTR). (Your address will 
be 33F4 for v6.78.) This is the famous output string 
subroutine in ROM. Let’s not use it from ROM, but write 
our own version of OSTR inside CYPHER. When OSTR 
is called, the HL registers hold the address of the first byte 
to be printed. The last byte is followed by ‘‘239.’’ This 
routine (which we shall call OMSG) will do: 


Lape! Mnemonics Operationicccccccedaclesdeccccecesc Address Hex Code 
OMSG: MOV A,M ; Move memory byte to accummulator 842D 7E 
CPI 239 ; Is it the end? (239=EFH) 842E FE EF 
RZ ; Yes, return to caller 84386 C8 
CALL LO ; No, print this byte 8431* CD C8 17 
INX H ; Point to next memory location 8434 23 
JMP OMSG; and get next byte 8435 C3 2D 84 


* "CD F4 33" for v6.78. 


There is room for this routine at 842D (leaving a few bytes 
free beyond the ASCII string). We cannot use it as shown 
above. for we must replace all the labels with actual ad- 
dresses. Instruments allow you to insert op codes and their 


accompanying addresses in memory in the form of hex 
numbers. IDA will let you enter the mnemonics directly, the 
rest of you will have to poke in the hex numbers, one at 
a time from the table above: 


IDA>D 842A 15+ COMMAND>E 842D DBG>3842D 
CUP/ARROW) to 842D 842D: FF- 842D FF ’_’ RST 7 
Press [0) to set (Enter 7E MEM>=7E 
origin for IDA’s FE MEM>=FE 

assembler. EF MEM >=EF 
ASM>MOV A,M c8 MEM>=C8 
ASM>CPI 239 CD MEM >=CD 
ASM>RZ C8 (*) MEM>=C8 (*) 
ASM>CALL 17C8 (#) 17 (*) MEM>=17 (*) 
ASM) INX H 23 MEM >=23 
ASM>JMP 842D C3 MEM>=C3 
CRET]) 2D MEM >=2D 

84 MEM >=84 
{ DOWN/ARROW) MEM>/ 


* Use 33F4 for v6.78 (F4, 33) 


Disassemble from 842A to verify that the subroutine has 
been entered (List F). Now we have to call 842D every time 
we formerly called 182A. IDA makes it easy to find all the 
references to OSTR in our program. We will conduct a ’’sim- 
ple search”’ for the code string ‘*‘CD 2A 18”’ (or CD F4 33), 
placing the low byte first for the OSTR address. While these 
address bytes ‘‘read right’’ in the disassembly, you know 
by now that they are reversed in memory: 


IDA>SS 8266 8586 CD 2A 18 
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(Sorry. MLDP can’t 
do this.) 


COMMAND>F 82868 847D CD 28 1A 


IDA and DEBUG locate this code at four places: 8206, 
820C, 827D, 8290. With MLDP, you would have to 
disassemble the entire file, and watch for OSTR’s address, 
making note of its occurrances. IDA will also replace the 
code at these addresses if we ask it to. We perform a “‘search 
and replace.’’ When using this function IDA asks for your 
‘‘replace’’ string (RPL): 
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IDA)SR 8288 8588 CD 2A 18 COMMANDDE 8286 DBG) 38286 
RPL>CD 2D 84 8286: CD- 8266 CD 2A 18 
[RET] MEM>=CD 
While they’re doing their 8287: 2A- MEM >=2D 
thing (to the right), (Enter 20 MEM >=84 
let’s check it out by 8288: 18- MEM >=/ 
disassembling at least (Enter 84 DBG> 28270 
one address, using [ DOWN/ARROW] MEM >=CD 
IDA>G 8288, to watch our COMMAND>E 8270 MEM>=2D 
new OMSG at work! By that 827D: CD- MEM>=84 
time maybe the others will [RET] MEM>/ 
be ready to go on! 827E: 2A- Cetc.) 
(CPU/RESET) (ESC) [%*) to (Enter 2D 
return to IDAD. Cetc.) 


IDA>D 8448 16+ 
[UP/ARROW] to 8448. 


Press (P] for Peek/Poke 
option. 
C[RIGHT/ARROW) to 8449 
Press CINSERT/CHAR) [A] 
CRIGHT/ARROW) to 844B 
Press CINSERT/CHAR) [(B) 
Continue until all 
letters are changed. 
At the end of the first 
line of ASCII display, 


COMMAND>H 8448 847E 


COMMAND>E 8449 
8449: SA- 
(Enter 41 
CRET] CRET]) 
(Enter 42 
CRET) CRET] 
(Enter 43 
Cetc.) 


(Enter SA 


(Be sure you change all four addresses.) 


We can now save this new version of CYPHER, but rather 
than create still another new disk file, we will write new ver- 
sion 2 over new version 1. We can do this easily with the 

CS WRite instruction. Using the same SBLK as before we 
will transfer new version 2 to disk. Substitute your own disk 
block number for my ‘‘207’’ again: 


IDA>XWRI 287 8288-847D 

DEBUG AND MLDP: (CPU/RESET] (ESC) [D) 
FCS>WRI 287 8286-847D 
Now let’s write another copy of CYPHER to a clean disk. 
Remove the first disk and put a clean disk in the drive. We 
don’t really need a directory, you know, so let’s write 
CYPHER beginning at block 00. Do not use a disk for this 
procedure that contains anything you want to keep. Any 

directory on this disk will be destroyed: 


IDA>XWRI 68 828686-847D 


DEBUG AND MLDP: FCS>WRI 287 8266-847D 


Now look (or try to look) at this disk directory. You will 
get an ENVE error because there is no directory. But 
CYPHER is there, my friends. Fill 8200-8500 with 00 again 
and verify that this memory is cleared. Now read CYPHER 
back into memory from the same no-longer-clean disk: 


IDA>XREA 686 8288-847D 


DEBUG AND MLDP: FCS>REA 88 82686-847D 
FCS>CESC) (*] 


Disassemble from 8200H. There it is! Isn’t this great fun! 
You can ‘‘run’’ the program with ‘‘G 8200”’ if you are 
skeptical. 

For our last act this time, we are going to change the en- 
coding used by CYPHER. We will be original and let a Sa 
= ’’A’’ **B’?="’B’’, and so on. This is an easy change to 
make. The encoding table begins at 8448. The first letter 
(’°A’’) is the ‘‘normal’’ letter of your keyboard input. It 1s 
followed by the letter to which the first letter will be encod- 
ed (’’Z’’). This correspondence between pairs of letters con- 
tinues to 847E. The last two entries, at 847C and 847D “con- 
vert’’ spaces to spaces, to allow them as legal entries into 
the code. (Any character not represented in the table is not 
recognized. Does that give you any ideas for the space begin- 
ning at 847E?) List G is IDA’s printout of this memory range 
in ASCII. The other instruments will make a hex dump of 
this table to use for reference as you poke in the new data. 
Be careful you get the right address for data entry: 
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the next line will be CRET]) 
displayed automatically. { DOWN/ARROW ) 
Press (RET) to return 


to IDA>. DBG>D 8448:847E 


(Error in MLDP manual 
for this command. It 
is shown correctly here. 


Verify the new encoding table with 
a dump from 8448 to 847D. You 


should see pairs of hex numbers DBG) 38449 
from 41 to SA. You can also try the ot my ft 4 
program by running it again. neTy 2RET 
: ‘ MEM >=42 

We are going to save this new en- (RET) CRET) 
coding table as a separate disk file. MEM)>=43 
We will put it on the disk with no Cetc.) 
directory. In order to do this, we MEN DaSA ne 
need to know how much disk space 847C: 28 
CYPHER occupies, so we won’t MEM)/ 


overwrite CYPHER accidently. 

CYPHER begins at 8200 and ends at 847D. Let’s calculate the 
number of bytes. (There is a mistake in my MLDP manual regar- 
ding calculations. The ‘‘/’’ symbol is not to be used at all. Numbers 
entered directly will be assumed as hexadecimal numbers. Numbers 
preceeded by a ‘‘#’’ will be taken as decimal.) 


1DA>847D-82866= 
827D 637 686606818 61111181 


DBG>=8470-82868 
=627D #637 


Calculations say the program is 027DH or 637 decimal bytes 
long, but we must also add the end byte, which makes 638. 
Wait a minute! With IDA we don’t have to calculate this. 
If we enter a ‘‘V”’ at the IDA prompt, IDA prints the usual 
directory but adds the file size in hex and decimal for us 
(List H). Well, anyway, how many blocks is this (at 128 
bytes/block)? 


1DA)627D/41 28 DBG>627D/#1 28 


The calculators say 4 blocks, but they are performing in- 
teger arithmetic. It’s actually 4.98 blocks long. We’ll say 
5 blocks because we must write with integer values of block 
numbers. FCS begins numbering its blocks with 00, so the 
sixth block, where we might plan to put our new table, is 
actually referred to as block ‘‘5’’. For some reasons that 
might become apparent later on, let’s store it beginning at 
block OA. The code table begins at 8448 and ends at 847B: 


IDA>XWRI BA 8448-847D 


DEBUG AND MLDP: (CPU/RESET) CESC) (D) 
FCS)WRI 8A 8448-847D 


Now we can use either code table. If we REAd CYPHER 
to memory from block 00 we will have the original table: 
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IDA>XREA 68 82868-8470 
DEBUG AND MLDP: FCS>REA 66 8280-847D 


If we ‘‘overlay’’ the code table from block 0A we will have 
the amended code table: 


IDA>XREA 8A 8448-847D 


There is no directory to give tell-tale clues about the disk 
contents. We have a rather well-protected encryption pro- 
cedure as long as we don’t forget which block is which. 


Well, let’s try one more act. Load CYPHER.PRG back 
into memory from block 00. Now initialize the ‘‘clean’’ disk 
we have just been using, but only allow ‘‘five’’ directory 
blocks: 


IDA>XINI CD@:FREE 5 


DEBUG AND MLOP: FCS>INI CD@:FREE 5 


Call up the directory and find the first available unused 
block (SBLK for ‘‘Free Space.’’) WRIte CYPHER to that 
start block (my SBLK is 05): 


IDA>XWRI 65 828686-847D 
DEBUG AND MLDP: FCSWRI 85 82886-847D 


If you look at the directory again, you’ll notice CYPHER 
isn’t listed even though we just ‘‘wrote’’ it there. Now go 
into BASIC by pressing in sequence [CPU/RESET] [ESC] 
[E]. We are going to create a-directory entry for 
CYPHER.PRG from BASIC! Since CYPHER takes near- 
ly five blocks, we can reserve 5 * 128 bytes/block for it 
(= 640 bytes total). Type the following in ‘‘immediate’’ 


mode: 
FILE "N", CYPHER.PRG, 1,646,1 


Call up the directory from FCS. We have a record of 
CYPHER’s presence. Type ‘‘RUN CYPHER.”’ Honestly 
now, did you really think it was going to work? Well, it can 
if we put in the correct loading and starting addresses...... 
next time. Meanwhile, you can WRIte it into memory and 
‘‘run’’ it from your instrument; no one else is going to RUN 
your secret encoder! If you wrote CYPHER to disk begin- 
ning at block 05, then the ‘‘overlay’’ is still intact at block 
OA. You can load it just as we did before. For homework, 
why not create a directory entry for the overlay? More fun 
to come!) W. S. Whilly 


Note: All listings and their comments were printed directly 
from IDA’s screen. A “CRI mode” facility permits writing 
comments anywhere on the screen for inclusion in printouts. 
Virtually any IDA screen display may be sent to the printer 
during the course of work. 


PRL Let 


=. 
——! —e “eA ‘ 
2 e, %. 


(2 


> 
Se 


83 CTE 
83 CTA 
83 IDA8 
83 IDAE 
83 MLDP 
83 MLOP 


IDA>D 842A 15+ 
842A «EF RST 
842B «FF RST 


8420 = FF RST 


842) = 7E MOV 
842E = FEEF CP] 
8438 §86C8 R2 
8431 CDCBi7 CALL 
8434 23 INX 
8435 (€32D84 JUMP 
8438 FF RST 
8439 FF RST 
843A_—s*FF RST 
8438 = «FF RST 
843C = FF RST 


IIDADP 8448 ~—s List G 


8448 49 4A 4B 4C 4D 4E 4F 
Ae BY Cs 8.8 
41 3A 42 59 43 58 44 57 


8458 5? SA SB SC SD SE SF 
ck 0 EPL G 
49 52 44 31 4B 58 4C 4F 


8468 69 6A 6B 4C SD SE OF 
AE SS NE EE et Pay at * 
31 4A 52 49 53 48 54 47 


8478 79 7A 7B 7C 7D 7E 7F 
T €..2.4 1 3 
99 42 A 4) 26 28 31 33 


DIRECTORY DFG: CYPHER 85 
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List F ¢OMS6) 

rs) ; 0 

? 

7 

A.M Wie { 

EFH » 9 239 < 
;H { 

17C8H : LO { 

H 2% { 

842DH : C-D ( 

? 

7 

? 

? 

? ; 


(The encoding tabie) 


List H RYTE COUNT 


ATR NAME TYPE VR SBLK SIZE LBC LADR SADR HEX DEC 


~PRG;81 6865 6622 88 8208 8788 1188 4392 
»PRG;81 8627 882E 43 82A8 7088 1603 3827 
»~PRG;81 8855 6848 88 8288 8288 2088 8192 
»PRG;81 6095 8848 86 EbG8 EGG 2008 8192 
»PRG;81 6605 G83F 86 8268 8286 1F86 8864 
-PRG;82 8114 8O3F 86 EG88 FBG 1F88 8864 
83 DBUG32.PRG;81 8153 6621 66 EBBB EBRG 1668 4192 
83 SMP798.PRG;81 6174 8826 86 8200 8208 1388 4864 
83 SMP79A.PRG;01 819A 8826 86 ADBB ADEB 1386 4864 
83 SMP79E.PRG;@1 8108 8826 88 EDO@ EDBA 1388 4864 
@3 CYPHER.SRC;@1 B1E6 BB1C 56 6888 6666 BDDS 3542 
83 CYPHER.PRG;@1 282 6805 7E 8200 8208 @27E 638 
83 CYPHER.PRG;62 6267 6885 7E 8288 8286 627E 
@1 <FREE SPACE) @28C 1088 
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638 <<{¢ 


SOFTWARE CATALOG 


the following significance: 


SEPARATOR (‘ +‘ indicates 
PART NUMBER | ROM version available.) 


990032/QDTFEC 


| | X: Not rated 


Quality of Software Status of Documentation Available Disk Types 


The following information is reproduced by courtesy of Intelligent Computer Systems, 12117 Com- 
anche Trail, Huntsville, AL 35803. (205-831-3800). It is extracted from their software catalog for CCI], 
3650, and 9650 computers. Prices are current. To our knowledze, ICS is the only ‘full line’ East Coast 
distributor for CCII software. Personal experience has proved them to be conscientious, reputable, 
and knowledgable dealers. Colorcue recommends that you consider purchasing any of these software 
selections soon, because their availability in the future is uncertain. 


The software catalog number appears first, followed by an evaluation code of six characters with 


User Experience Required 


A: Beginner 
B: Intermediate 
C: Advanced 
D: Expert ; . 
Available Disk Formats 


: CCII/3621 v6.78 
: CCII/3621 v8.79 
: 3651/9651 v9.80 


Category of Software : 3651/9651 v9.80-3 


CONN MN Hh wWN = 


: Both 1 and 2 

A: Good A: Good 1: 5** MD for 3651/9651 A: Business - Both 2 and 3 
B: Average B: Average 2: 5’ CD for CCII B: Finance : Both 3 and 4 
C: Needs Improvement C: Needs Improvement 3: 8°’ FD for 3651/9651 C: Engineering : All types 
D: Inadequate D: Not available, not needed 4: 5’’ MD or 8’’FD for 3651/9651 D: Educational 
X: Not rated. X: Not rated 5: All disk types E: System Utilities 

F: Special Applications 

G: Games and Entertainment 
BUSINESS 


JH102A/AA58BA ASSEMBLY DATA BASE/$85. Assembly 
language program to write data fields into formatted SRC 
files; includes editing, sorting, and printing facilities. 
Change, delete, edit, review, sort, and search. Print entire 
record or up to five selected fields. Screen editor may edit 
files. Convert existing RND files to SRC. Fast disk access. 
Options available for extended performance. 


JW129/AA58AA CARAMOR/$24.58. Car expense accounting 
with calculation of cost/mile, cost/day, etc. Can determine 
cost effectiveness of lease/rental/own vrs _ public 
transportation. 


991545/AB58BA COMP-U-WRITER/$190. Full-feature word 
processor with single key commands, full screen editing, 
move, copy, delete, search and replace, boldface, underlin- 
ing, selection of print parameters, fast disk access, 
mailmerge facility. Professional performance. (Colorcue is 
written on Comp-U-Writer. Ed.) 


BG115 + AB25BA COMPUCALC/$120. ‘‘Spreadsheet’’ pro- 

gram in assembly with unique file recovery system, stores 

data on ARY files. Contains usual ‘‘Visicalc’’-like features. 
fficient, trouble-free software. 


EM122/BB58AA DECISION MAKER/$10. Program examines 
input parameters for best buy or optimum decision. Op- 
tional printer readout of input and output data. 


EM111/AA58AA INVOICE & ORDER/$30. Write personalliz- 
ed invoices to printer, with inputs for discounts, taxes, ship- 
ping, credit card numbers; input error correction provided. 
Totals and customer ID can be stored on disk. Orders may 
also be written, with similar features, and from a data base 
for frequently-used vendors. 
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EM109/BD58AA LABEL/$15. Use any line printer to print 
address labels. Special print features of Epson and IDS 
printer families supported. Print individually or from disk 
file. 


JW104/BA58AA PERT/$39.50. Create 7 PERT plans with 200 
activities each on one disk. Create, modify and analyze plan 
to determine critical paths, with data accounting. 


JH114+ AB58AA PLANNING CALENDAR/$17.50. Assembly 
language program to log 7 events/day to total of 400 events. 
Specify daily, weekly, monthly, quarterly, bi-annual, and 
annual repetition. Requires screen editor or assembly data 
base to set up files. 


EM103/BD58AA SCHEDULE/$49.50. Generate, update, and 
save bar graph screen displays of scheduling. May be printed 
on Epson and IDS printer families using special character 
functions. Designed for multi-national aerospace projects 
and is readily applicable to many other complex situations. 


EM120/BD58AA VU-GRAPH/$10. Quick generation of VU- 
Graphs for printout, with descriptor fields, centered text, 
highlighting. 

991005/BA58CB BONDS/$20. See effects of bond price and 
yield by variables, use realtime dates or time-to-maturity, 
up to 5 call dates for callable bonds. Print amortization 
schedule with a single keypress. 


991007/AA58BA EQUITY/$20. Depreciation by straight line, 
double-declining balance, constant percentage, sum of digits, 
and sink-fund methods. Capitallized cost of periodic changes 
of up to three assets simultaneously to determine best op- 
tion. Solve for any variable in the capitalization equation. 
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EM202/BD58AB FINANCIAL PROGRAMS SERIES/$18.50. 
Twenty programs for daily use in business management, in- 
cluding future investment value, calculation of effective in- 
terest rate, earned interest table generation, depreciation 
rate, depreciation amortization, salvage value, principal 
loan, payment on loan, last payment on loan, term of loan, 
mortgage amortization, and more. 


EM205/BD58AB GENERAL LEDGER/$48.50. Capacity is 99 
credit and 99 debit accounts with 200+ records per month. 
Printouts include accounts summary report by month and 
quarter, quarter and year, and complete account report by 
item. 


EM201/AD58AB GRAPHICS CHECKBOOK/$38.50. Accom- 
modates 15 expense and 6 deposit categories. Display or 
print (with Epson or IDS) tables sorted by date, totals of 
one or all categories. monthly cash flow, totals for category, 
for month, for year. 


JH206 + AAS8AB LEDGER PAD/$75. For business and home 
financial data. 80 rows by 32 columns, with titles, data 
editing, arithmetic computation, report generation (to screen 
and printer). Supports numbers to 99,999,999,99 and com- 
putes to 2 to the power 40 with $ 0.01 accuracy. 


DP208/AA58AB PERSONAL BUDGET/$29.95. Enter and edit 
monthly budget items by category, show CRT summaries 
in tabular and plot form of income, expenses, and ‘‘net 
worth’’(tabular form also on printer.) 


991001/BB58BB PERSONAL FINANCE/$20. Calculate an- 
nuities, interest rates, and mortgage payments by several 
methods. 


EM204/AD58AB REAL ESTATE INVESTMENT/$18.50. 
Calculate best mortgage, monthly payments, investment 
return, positive or negative cash flow. 


DP207/AA58AB STOCK FUND SWITCH STRATEGY/$39.95. 
For telephone switch mutual funds (or similar) to determine 
maximum earnings. Favors switch to common stock dur- 
ing market rise, and to cash or money market on market fall. 


ENGINEERING 


AUG401/BD58AC ELECTRICAL ENGINEERING I/$10. Color 
graphics supported; Ohm’s law for AC, DC circuits. 
Transformerless power supply design. 


AUG402/BD58AC ELECTRICAL ENGINEERING II/$10. Col- 
or graphics supported; attenuator design for T, H, PI, and 
O pad configurations. Multivibrator timing design for 
astable and one-shot. 


SP302/AB25AC GASMIL/$19.50. From mileage and gas pur- 
chase, computes last miles/gallon, average miles/gallon for 
last three fill-ups, and average miles/gallon to date. Data, 
by table or chart, to Epson MX-80 printer. 


993004/CD58BC STATISTICS 1/$25. 1) FILES: generates, 
maintains and displays files for use by other programs; 2) 
REGRES: linear, log, exponential or reciprocal regressions 
with confidence limits and graph; 3) PLOT: plot one to three 
graphs on rectangular coordinates from disk file or equa- 
tion; 4) STAT: compute measures of central tendency, 
dispersions, skews, movement about the mean, from 
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grouped or ungrouped data; 5) GRAPH: display histograms 
or polygonial graphs from grouped or ungrouped data. 


993006/CD58BC STATISTICS 2/$30. 1) FILES; 2) MLTREG: 
multiple linear regressions to 6 variables, with or without 
transformations; 3) POLREG: polynomial regressions to Sth 
degree; 4) DISREG: fits binomial, norm, or Poisson 
distribution to input data, plus CHI-square check for 
goodness of fit; 5) VARINZ: test several sets of data for 
variance, estimate evaluation mean. 


993008/CD58BC STATISTICS 3/$30. 1) FILES; 2) TIMSER: 
smooth time series by trend regression and other cyclical pro- 
cedures; 3) INDEX: computes eight types of index data for 
several sets of data; 4) CMPTIM: computes variation within 
or between sets of data; 5) RANK: rank analysis on data 
Oairs using Mann-Whitney test, computes rank correlations. 


EDUCATIONAL 


BM310/AA25BD ASSEMBLY LANGUAGE TUTORIAL/$50. 
18 lessons in assembly language programming. 


992516/AA58BD BASIC LANGUAGE I/$25. Two disks, vegin- 
ning tutorial. 


992519/AA58AD BASIC LANGUAGE II/$20. Program 
algorithms, more advanced commands. 


992512/AB58AG HANGMAN/$20. Word game. Disk also in- 
cludes MATH TUTOR for simple arithmetic and logic, and 
TWO TO TEN, a simple card game for practice in sums. 


992514/BB58AD MATH TUTOR/$20. Simple arithmetic. Disk 
also includes CHECKBOOK, for checkbook balance and 
income tax data; RECIPE for storage and retrieval of 
favorites; MATH DICE for practice of elementary 
arithmetic, and the BIORHYTHMS program from the 
Sampler. 


AUG301/BD58AD PRIMES & PRIME FACT/$10. Prime 
numbers and factoring to primes. 


SYSTEM UTILITIES 


SYSTEM UTILITIES [Comments in this section by COLORCUE. 
Starred programs are highly recommended as basic software 
packages for both the CCIl and 3650 series computers. Evalua- 
tions are made on the basis of completeness, reliability, versatili- 
ty, and usefulness with all software versions. In some cases other 
software may perform as well for your needs. Only one recommen- 
dation is made in each category.] 


Definitions: Screen editor: used to enter assembly language source 
code and any other text that can be stored in a SRC file (contain- 
ing only ASCII characters). May function as a mini-word-processor. 
Printing capability to serial printer. Easy editing of text in full view 
on CRT. Will load and edit any SRC or TXT file, as well as any ASCII 
file with optional file extension type. Monitor: a program to examine 
and modify the 8080 registers in the course of program execution, 
sometimes single-step through a program, examine and modify 
memory. Assembler: a program to convert ASCII source code 
(mnemonics) into machine code, producing a memory image file, 
ultimately “runnable” as a finished PRG program. A good 
assembler finds coding errors and flags them, and produces hard- 
copy of assembly showing source code, machine code, label 
chart and address assignments. Debugger: an all-purpose tool for 
working with any kind of disk file, principally used to work with PRG 
files. A complete debugger will act as an interpreter, monitor, mini- 
assembler, and disassembler. It facilitates examination and repair 
of disk file damage, disassembly of ROM, error correction in BAS 
files. 
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JH855 + AA25CE ASSEMBLER/$20. Jim Helm’s assembler 
with printer driver. 

JH811/AB25BE BASE2/$15. Set printing options on BASE 
2 printer. 

** QS816+ AB58BE ‘The’ BASIC EDITOR/$49.95. Quality 
Software’s tour-de-force. 


CT851 + AA2S5AE BASMERGE/$19.95. Merge Basic programs. 


JH856 + AA25BE BASSRC/$19.95. Basic code to SRC file 
conversion. 


** CT830 + XX25XE CLIST/$19.95. List Basic programs to 
printer; converts control characters to printable symbols for 
increased accuracy of printed program. Works with more 
printers than most. 


CT828/XX25CE COMTRX/$19.95. Terminal software, for 
network communications. 


JH857 + AB25CE CROSS REFERENCE GENERATOR/$10. 
Generates cross reference of JMPs and CALLs from 
assembly code. SRC code for program available. 


** CT852 + AA25CE CTA-ASSEMBLER/$34.95. Probably the 
best all-around assembler for ISC computers using FCS. 
Good printer driver, good error displays. 


** CT833+AB58CE CTE-SCREEN EDITOR/$54.95. Text 
move, copy, delete, control character inserion. Will accom- 
modate upper-case-only if necessary; all keyboards. Printer 
driver not as good as CTA, but adequate. Designed for 
source code entry, may be used as limited word processor. 


CT841/AA22BE DEBUG/$29.95. Editor, monitor, 
disassembler, mini- assembler. Fine debugging tool, supports 
serial printer. 


CT825 + AAS58AE DFM/CRC/$49.95. Disk duplicating; com- 
plete disk on | or 2 drives, single file to either drive. Scan 
disk by sector, protect files, change directory, write unique 
format. 


JH838 + AA25BE DIRECTORY/$15. Creates directory SRC 


file compatible with Jim Helm’s assembly database 
program. 


CT822/AA25BE DIRMOV/$24.95. A directory handling 
system for up to 600 disk directories, with machine language 


sort by name or number; search, delete, add, save, or print 
results. 


BG836/BD25BE DIRECTORY ORGANIZER/$19.50. Saves 


directory informaion in SRC file, for editing by screen 
editor. 


JH837 + AB25AE DISK EDITOR/$20. Move, copy, rename 
disk files. 

JH809 + AAS8BE DRIVER/$10. Printer driver for SRC files, 
set printing parameters. Supports special control codes for 
Epson and Base? printers. 

JH815/AB25CE EXPANDED ASSEMBLER/$20. Printer 
driver, line overflow function, program count, auto-pause 
on error. 

JH814/AA58BE EXPANDED SCREEN EDITOR/$20. Com- 
plete screen text editing with move, copy, delete block func- 
tions. Good programming. Not for 3651. 
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CT850 + AAS8AE FILEMRGE/$24.95. Merge SRC files. 
991527/AB47AE FORMATTER/$25. For 3651 5” or 8” disks. 


SP845/AD25AE FORMATTER/$24.95. For CCII, includes 
disk drive speed monitor and MAZE game. 
991532/AA58CE FORTRAN/$75. Fortran compiler, linker 
and library. Experienced users report satisfaction with this 
version of FORTRAN. 

JH813+ AX58AE HEXDEC/$10. Hexadecimal/decimal 
memory dump of system or selected sections. 

JH839+ AA25CE HEXDIS/$15. Assembly language 
disassembler, displays hex, object code, mnemonics to screen 
and printer. Creates SRC disk file is requested. 

** BG851/AA25CE 
Assembler/$49.50. 
This gets an entire page of stars. Software debugging tool. 
It is not a SRC code assembler in the usual sense, but does 
everything else to perfection. Fascinating graphics, 
unbelievable printer facilities, excellant monitor, absolute- 
ly written to ease debugging tasks. If you are a serious pro- 
grammer, this one will do it all, better than you ever thought 
possible. Available for loading at 4000, 8200, A000, E000. 
[See W.S. Whilly’s article, and review this issue.] 
CT853/AA25CE LDA FILE/$19.95. Convert LDA files to 
PRG the easy way. 


BM810/XA25CE LDIS/$29. Two-pass labelling disassembler. 


JH806+ABS8AE LISTER/$10. List BAS files to printer. 
Screens out control codes. 


CT829 + AB25AE LLIST/$19.95. List BAS files to printer, set 
printer parameters. 


JH812/XB25BE LOAD76/$10. For BASE2 printer; loads and 
prints user-defined character fonts. 

991539/AB58DE MACROASSEMBLER/$50. Similar to 
assemblers used by ‘‘professional’’ computers. Includes link- 
ing loader and cross-reference generator. Some impossible 
bugs but generally usable for most things. Difficult 
instructions. 

SP842/AD25AE MX80 BLOCK GRAPHIC DUMP/$14.50. 
MxX80 graphic dump of CCII screen. 

CT854 + AA25CE NUBUG/$39.95. Software debugging tool. Im- 
proved version of DEBUG. 

CT831 + AA58BE PRINT II/$19.95. Printer driver portion of 
Com-Tronics software. Fine driver; set parameters, pause. 


CT847 + AA58AE RENUM/$19.95. BAS file renumbering. 


JH805/AB25DE REPACK/$10. Removes REM statements 
from BAS files. 

JH840 + AAS58BE SCREEN EDITOR/$20. Requires deluxe 
keyboard, complete screen editing. Not for 3651. 

CT844 + AAS8AE SRCPRT/$24.95. Machine language dump 
of CCII screen to printer (especially IDS printers). Rests in 
high memory and ‘on call’ with key press. Requires very 
careful handling. Not satisfactory on 3651. 
JH805/AB58BE SMERGE/$10. Merge SRC disk files. 


CT831+ AA58BE SORT/$19.95. Binary-weighted sort pro- 
gram, callable from BASIC. Sorts up to 1000 variable length 
array elements. Rests in high memory or at 4000H. Reliable. 


IDA-Interpreter, Disassembler, 
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JH808/AB25CE SORT PROGRAMS/$20. Series of programs 
for SRC files; sort, set fields to equal length, add fields; add, 
remove, substitute, rearrange order of data. Versatile pro- 
gramming for SRC. 

JH802/AB25CE SOURCE/$30. SRC file from PRG file. Select 
dump to printer and to disk file. Set printer parameters. 
CT832 + AB25BE SRCBAS/$34.95. The reverse of BASSRC. 
Convert SRC files into executable BAS files. Good for 
modem users. 

JH803/AB25CE STRIP/$10. Remove sections of SRC files to 
disk. Set up SRC code subroutine library. 
CT846/AA25AE SUPER MENU/$19.95. Select programs from 
directory display by bar cursor. 

BG801/AB58CE SUPER MONITOR/$30. Subset of IDA (see 
above) and really obsolete because of it. Good monitor and 
debugger, but ‘how ya goin’ ta keep ’em down ’n the 
farm...? 

BG835 + AX58CE SUPER MONITOR PLUS/$49.50. Ditto. 
** CT821 + AA58BE TERM II/$69.95. Terminal software. The 
early version seems more bug-free, the second is easier to 
be with visually. Fancy provisions for uploading and 
downloading, setting transmission parameters. Good 
writing, but can’t someone get rid of the bugs? Ask ISC for 
both versions. 


CT831/BB25AE VLIST/$19.95. List BAS file variables to 
screen or printer. | 


SJ843/AA25BE XEDIT/$25.50. ‘A totally different screen 
editor’ with programmable function keys. New program, 
but we’ve had no experience with it. Can someone write a 
review? It sounds interesting. 


GAMES 


990046/AB58AG AIRRAID/$20. Airraid, Car race, Rover 
robot and Tiles. 

SR962/AD37AG ALIENS/$25. Good graphics, fast. 
AUG930/BC58BC B747 FLIGHT SIMULATION/$15. New 
York to Hartford. We need a review! 

JH908/AA58AG BIORHYTHM/$12.50. Assembly language 
with printout. 

990040/AB58AG BLACKJACK/$20. Blackjack, Roulette, 
Drag race, Horse race, Slot machine. 

990052/AA58AG BOUNCE/$20. Bounce, Battleship, Slither. 
AUG934/AB58AG BOUNCE BALL/$10. Bounce ball, 
Crossword, Create crossword puzzle, and 2 person chess. 
990036/BB58AG CHESS/$20. Chess, Acey-ducey, Line five, 
Biorhythms. 

SB950/AA58AG CHOMP/$29.95. Assembly masterpiece by 
David Suits. 

JH901/AA25AG CRIBBAGE/$20. A peg board on a screen. 
990042/AB58AG CUBIC TIC-TAC-TOE/$20. Tic-tac-toe, 
Greed, Galaxy, Space lander. 


RT960/AD25AG FINAL FRONTIER/$25. Rick Taubold’s 
space battle with the Klingons. 
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AUG933/AD58AG FOOTBALL/$10. Football, Space colony, 
Drop the marble,15 piece puzzle, Mastermind. 
JH937/AB25AG FOOTBALL/$20. Assembly language, with 
real time clock. 

QS910/AD26AG INVADERS/$34.95. The ‘arcade‘ version 
with sound, Tic-tac-toe, Battleship. 

JH906/AD25AG KALEIDOSCOPE/$10. Assembly language 
graphics thriller. 

JH905/BB25AG LIFE/$10. Assembly language life and death 
struggle. 

990056/ AB58AG LUNAR LANDER/$20. Lunar lander, Coali- 
tion, Linko. 


PS952/AD58AG MAZE/LUNAR LANDER/$14. Help a mouse 
find the cheese, and David Suits land on the moon. 
990060/ ABS8AG MAZE MASTER/$20. Maze, Crossword puz- 
zle, Create crossword. 


BG936/BD25AG MILLEBORNES/$15. Complete ve.sion of 
the French card game. 

AG935/AD58AG MONOPOLY/$10. Monopoly, Maze, Puz- 
zle, and Hyper-space war game. 

990034/AB58AG OTHELLO/$20. Othello, Math dice, 
Concentration. 

WL949/AB25BG PROJECT APOLLO/$14.50. Dock Apollo on 
Skylab. Good graphics. 

JH904/AB25AG PYRAMID SOLITAIRE/$15. The card game 
for the recluse. 

SR961/AD37AG ROBOT WARS/$25. Fast action space game. 
AUG932/BD58AG ROULET/$10. Roulet, Reverse number 
game, Dog chase cat, Ask Eliza, Clock, Robot. 
JH907/AD58AG SCROLL/$10. Scrolling demo with source 
code. 

990044/AB58AG SHARKS/$20. Sharks, Towers, Kalah, Mill. 
990054/ AB58AG SHOOT/$20. Shoot, 15 piece puzzle, Hyper- 
space war game, Seawar. 

GH947/AD25AG SNAKES & LADDERS/$25. Board game 
from Australia with sound. Lemonade stand, Time 
signature. 

JH903/BB25AG SOLITAIRE/$15. Standard solitaire. 
JP940/AD25AG SPACE ARCADE I/$29.50. Three fast-action 
games: Galaxy attack, Invaders, Galactic patrol. 
JP941/AD58AG SPACE ARCADE II/$29.50. Meteor mission, 
Orbits, Star battle. 

AUG931/CD25AG SPACE WAR/$10. Good graphics. 
GH946/AD25AG STAR FIGHTER/$20. Games with sound, 
plus word puzzle. 

BJ920/BD25AG STAR TEC/$19.95. Star trek, Mastermind, 
Bounce, and x-y graph plot demo. 

9048/AB58AG STAR TRADER/$20. Star trader, Color hunt, 
Decision maker, Calendar, Concentration. 


990050/AB58AG SWARMS/$20. Swarms, Human reaction 
time, Roulette, Reverse numbers, Captain Alien. 
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SOFTWARE REVIEW 


Joseph Norris 
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The primary source of software for the Compucolor/In- 
tecolor line of computers is Intelligen Computer Systems, 
in Huntsville, Alabama, whose catalog is printed in this 
issue. In addition, there are several other sources of pro- 
grams, source code, and programs in ROM, some sources 
with only a few offerings. This summary will treat these ad- 
ditions to the software library. It is important, too, to 
remember the disk libraries of the several user groups. 
Catalogs of these holding are available to members. 


FASBAS. $25.00. Peter Hiner, 12 Pennycroft, Harpenden, 
Herts AL5 2PD, England. This is the one and only Basic 
Compiler for the CCII and 365] (all versions.) At this time, 
all Basic commands are compilable. Peter is contantly mak- 
ing :mprovements, which are available to previous buyers 
free of charge if they send back the disk (or send $5 for a 
new disk.) A new compiler, called ZIP, is in preparation 
which Peter says makes Basic color graphics nearly as fast 
as assembler graphics. We’ll give more details when ZIP is 
ready. The price of FASBAS is mine, not Peter’s. It is ap- 
proaching the obscene to pay him less for all his incredible 
effort. Don’t you agree? 


COLOR GRAPHICS DISKETTE. $20.00. Joseph Charles, 
PO Box 750, Hilton, NY 14468. This diskette contains 
almost all the demonstration programs listed in David Suit’s 
book on color graphics for the CCII/3651 computers. It will 
save many hours of typing. When ordering, please specify 
the software version desired. 


COLORWORD, word processor, screen editor. $50.00. 
(Shipment by airmail included.) Program Package Installers, 
PO Box 37, Darlington, Western Australia 6070. For CCII 
(all versions), and 3651 computers. Assembly program with 
20K buffer for any keyboard. Will process existing SRC files 
(or any file extension representing an ASCII text file), with 
conventional word processing facilities: word wrap; block 
copy, move and delete; string search with optional replace; 
upper or lower case character set accommodated; HELP 
facility; printer parameter setup; automatic repeat on 
keys*rckes; imbedding control characters for printer 
parameters; screen preview of printout; compact FCS file 
storage; all FCS commands available. 


COM-TRONICS. Com-Tronics software is available from 
Inteligent Computer Systems. There is no current activity 
for CCII from Com-Tronics, and they have not answered 
my mail. Fortunately, little software support would be re- 
quired. Com-Tronics programs, by and large, work very well 
on all software versions. CTE and CTA are still my 
Standards. 


GARY DINSMORE. Selected software available. See adver- 
tisement in last Colorcue. Gary is still interested in 
establishing an independent software marketing arm for 
CCII. Write to him for details. 


30 


BILL GREENE. Bill has current releases of Compucalc, 
IDA, some games, and a (free) version of FORTH for the 
CCII. His software is available through Intelligent Computer 
Systems. FORTH may be obtained by writing to Bill (or to 
Colorcue for a version of FORTH for 3651. Colorcue will 
also assist in providing 3651 versions of any other Greene 
software.) 


JIM HELMS. Jim has announced that he will not support 
his software for the CCII/3651 beyond October of 1984. 
The source code for his software is therefore for sale at a 
cost equal to 1.5 times the selling price of the assembled ver- 
sion. Source code may be ordered from Jim Helms, and pur- 
chasers must agree not to distribute such purchased code. 
User groups may purchase source code for their libraries, 
with distribution regulated by the same rules that apply to 
disk library holdings. Software compatibility to 3651 com- 
puters has been a problem for Helm software. If versions 
dated 1983 or later are used, they may be assumed compati- 
ble with 3651. Otherwise, Jim cannot guarantee results. 


Helms software is available from Jim Helms or from any 
of these authorized dealers: Intelligent Computer Systems, 
12117 Comanche Trail, Huntsville, Alabama 35803; Howard 
Rosen, PO Box 434, Huntingdon Valley, PA 19006; Pro- 
gram Package Installers, PO Box 37, Darlington 6070, 
Australia. Some price reductions have been made recently. 
Note that many programs are available in ROM for use at 
4000H. 

Jim Helms. 1121 
(512-895-5136) 


Warbler, Kerrville, TX 78028. 


METIER. This software firm specializes in programs for 
educational use in schools. They write software to specifica- 
tion in Basic for a variety of computers, including the CCI] 
and 3651. Most software may be altered to suit specific 
needs. Purchaser of programs must agree to the sale con- 
tract prohibiting copying or redistributing the materials. 
Some currently-available programs are listed here: 
Database - Names, Addresses, Phone numbers (home use) 
$27.95 

Programs for Trigonometry, $29.95 


Names, Addresses, Student Data (for teachers), $27.95. 
(Note: the above programs may be purchased by Colorcue 
subscribers for $15.00 for a limited time.) 

Budgets, Requisitions and Cash Flow (useable with Title IV 
grants), $700.00. 

Please write to METIER for a complete description of this 
software and other services. 

METIER. PO Box 51204, San Jose, CA 95151. 


PROGRAM PACKAGE INSTALLERS. This Australian 


firm is offering selected software on disk or in ROM (for 
4000H): 


Colorword, $55; General Ledger, $70; Disk Editor/Format- 
ter, $20; Directory (for use with Database II), $20; WISE- 
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II (emulator), $25; Lister (Basic programs), $15; Printer 
Driver (for SRC files), $15; Screen Editor and Assembler, 
$30; Cross Reference Assembler Utility, $15; BASSCR, 
HEX/DIS, SOLITAIRE, and CRIBBAGE, $15 each; 
‘THE’ Basic Editor (available soon.) 


PPI will copy your program to ROM for $10.00. 


Program Package Installers. PO BOX 37, Darlington 6070, 
Australia. 


Compucolor/Intecolor User Groups 


The active user groups still serving Compucolor and In- 
tecolor owners are listed here. As usership declines, there 
tends to be a collaborative spirit among these groups, shar- 
ing library holdings as well as articles for publication. Should 
you join more than one? If you are hungry for every bit 
of available information, I think so, particularly CHIP, 
CompUKolour, and CUVIC. These publications will be par- 
ticularly helpful in providing the little bit of hardware source 
material that might be available. There are borrowings from 
material in Colorcue, and you may expect this to continue. 
However, local activity is still in evidence, and this activity 
is sometimes only available in the local publication. We have 
done our best to gather complete information. Please write 
to the group of your interest for more details. 


AUSTRALIA 

CUVIC, Victorian Compucolor Intecolor User Group. 
Monthly newsletter, about six pages, with meeting notes, 
reviews, software and hardware articles. Recent article titles 


have been on Comp-U-Writer techniques, reading and 
writing FCS files to Comp-U-Writer (including SRC and 
TXT files!), a Computerized Star Map, and conversion of 
disk drives for use with the CCII. I find CUVIC a good 
source of ‘hard-to-find’ material. Meeting attendance varies 
between 15 and 20. Total membership unknown. Subscrip- 
tion rate unknown, but probably about $30 for US readers. 
CUVIC maintains a disk library, $5 disk cost for copies of 
their holdings (plus postage for U.S.) 


President: Ken Winder, 8 Brindy Crescent, East Doncaster, 


3030, Victoria, Australia. 
Secretary/Treasurer: Ted Stuckey, Box 420, Camberwell, 


3124, Victoria, Australia. 

Editor: Barry Holt, 19 Woodhouse Grove, Box Hill North, 
3129, Victoria, Australia. 

Address library requests to the Secretary. 


CUWEST, Western Australia Compucolor Intecolor User 
Group, quarterly newletter, about 8 pages. Membership 
about 30. Articles in last issue included a discussion of 
Australia’s VIDEOTEX system, and a reprint of Gary 
Dinsmore’s article from Colorcue. 

Secretary: John Newman, PO Box 37, Darlington, 6070, 
Western Australia. (Program Package Installers) 


UPDATE, the publication of the Compucolor User Group 
of New South Wales. I have not seen this newsletter, but 
I suspect it serves a small membership. 

Editor: Tony Lee. 52 Cowane Road, St. Ives 2075, New 


South Wales, Australia. 
( Continued on back cover ) 


Back issues of COLORCUE contain a wealth of practical information for 


to current. 


the beginner as well as the more advanced programmer, and an historical 
perspective on the CCII computer. Issues are available from October 1978 
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GREAT BRITAIN 


CompUKolour, the magazine of the Compucolour User 
Group (UK), published quarterly, or whenever, about 20 
pages. Heavy article content and valuable material. Recents 
topics have included ‘Improving your power supply’, “Tran- 
sistor replacements’, ‘Compiling Basic’ (Peter Hiner), and 
‘CREF, a cross-reference generator.’ Issue 5 was dated 
December 1983, Issue 6 was dated March 1984. Member- 
ship fee is fifteen pounds (UK) yearly. Number of members 
unknown. This publication carries some resemblance to 
FORUM, and seems like a good source of materials. The 
user group maintains a disk library, and is currently shar- 
ing holdings with CHIP, in Rochester. 


Secretary: Peter Hiner, 11 Pennycroft, Harpenden, Herts 
ALS5 2PD, England. 


Librarian: Bill Donkin, 19 Harwood Avenue, Bromley, Kent 
BRI 3DX, England. 

Treasurer/Editor: John Booth, 27 Romany Lane, Tilehurst, 
Reading RG3 6AP, England. 


UNITED STATES 


CHIP, publication of the Rochester Compucolor Intecolor 
User Group. This venerable body, the granddaddy of us all, 
continues after six years as the leader in contributionship 
to periodicals, disk libraries, and general sustaining activi- 
ty. Membership is $10 per year, which includes a subscrip- 
tion to CHIP (quarterly if lucky), and access to their very 
large disk library. I don’t know their current membership, 
but monthly meetings draw from ten to twenty local 
members on a regular basis. Membership is international, 
however, and extensive. Newsletters can be 20 pages long. 
While content has been primarily a catalog of the disk library 
recently, CHIP, historically, is a source of material on all 
subjects relating to the CCII, hardware as well as software. 
An investment in back issues is well made (forgive me, Ben!). 
When the CCII is about to give it’s final sigh, the Rochester 
User Group will most likely be there to ease it’s last days. 
A remarkable collection of talent and dedication to whom 
we all owe a great deal. The list of names is a Who’s Who 
for all former and current CCII materials. CHIP is currently 
working to assist 8000 users and investigate conversion of 
their library to 8000 format. CHIP maintains a library for 


the 3650 computer series as well. Write to them for more 
details. 


Membership: Gene Bailey, 28 Dogwood Glen, Rochester, 
NY 14625 

Librarian: Doug Van Putte, 18 Cross Bow Drive, Rochester, 
NY 14624 

Editor: Ben Barlow, 161 Brookside Drive, Rochester, NY 
14618 


STAN PRO, West Coast user group and newsletter. I wish 
I could be more specific about this organization but they 
are, frankly, ephemeral at best. I have seen several newslet- 
ters, and they appear to include useful, and often ‘rare’ 
materials, with articles by names familiar and unfamiliar 
(Rick Manizar, Carl Hennig). Stan Pro has been an Intecolor 
dealer for some time, selling and servicing CCII, 3650 and 
8000 series computers. Communications between Colorcue 
and Stan Pro have been less than satisfactory. The best in- 
formation I have is this: the newsletter is still published 
quarterly(?), membership is about $35 per year, back issues 
are available (more than $100 per set). Service facilities are 
still available. Mr. Pro wrote to us recently giving permis- 
sion to Colorcue to reprint articles from past issues of his 
newsletter. We will be purchasing the back issues and review- 
ing them. Thre is a large disk library associated with this 
group, perhaps 1000 or so programs. I know nothing about 
their content or availability. Perhaps you will want to com- 
municate with Stan and see what is available. 


S. P. Electronic Systems, 5250 Van Nuys Blvd, Van Nuys, 
CA 91401. 


8000 SERIES COMPUTER USER GROUP 


A relatively new user group for 8000 users is in the process 
of organization. I have had correspondence with several 
members and the outlook for interfacing with v6.78, v8.79 
and v9.80-3 software looks promising. You may write to 
the ‘founder’, Glen Gallaway, at 1637 Forestdale Avenue, 
Beavercreek, OH 45432. Mr. Gallaway is in the process of 
moving and has a new address by this time, but perhaps his 
mail will be forwarded for awhile. Colorcue is interested in 
providing an outlet for articles, programs and source 
materials for the 8000. Please write if we can be of help. _] 


NEXT ISSUE: Last installment of Peter Hiner’s series on Compiling Basic; W. S. Whilly masters 
the disk directory; Compucolor parts and service information; A switching box you can build; An 


8000 article by Bob Mendelson....and more. 


COLORCUE 19 West Second Street « Moorestown, NJ 08057 


